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SOUND  RANGING  EFFECTIVENESS  MODEL  (SREM) 


1.  INTRODUCTION 

Recently,  there  has  been  a  resurgence  of  interest  in  sound  ranging 
as  a  target  acquisition  system.  This  resurgence  of  interest  may  be  attributed 
to  several  factors: 

(a)  Cost  --  when  compared  to  other  target  acquisition  systems 
sound  ranging  is  relatively  inexpensive. 

(b)  Detectability  --  while  radars  must  transmit  intermittently 
and  move  periodically  to  avoid  detection,  a  sound  base  is  passive  and  may 
remain  operative  continuously. 

(c)  Commonality  --  presently,  sound  ranging  is  the  most  common 
system  for  locating  hostile  indirect  fire  weapons  among  the  NATO  countries. 

(d)  Historical  success  --  during  both  World  War  II  and  the  Korean 
War,  sound  ranging  was  the  most  productive  target  acquisition  system  available. 

In  support  of  this  increased  interest,  AMSAA  has  developed  a  sound 
ranging  effectiveness  model  (SREM).  This  model,  which  is  keyed  to  a  two- 
sided  division  level  wargame,  was  developed  to  examine  the  loading  effects 
of  different  firing  rates  on  present  manual  sound  ranging  systems,  as  well 
as  to  help  establish  criteria  for  future  system  requirements. 

The  model  uses  artillery  missions  generated  in  the  division  level 
wargame  to  simulate  the  associated  sounds  and  the  times  they  reach  the 
sound  base  as  well  as  their  relative  intensities. 

Performance  estimates  for  various  sound  ranging  capabilities,  based 
on  3  1/2  hour-day  and  3  1/2-hour  night  combat  simulation,  are  given.  Re¬ 
sults  show  that  although  sound  ranging  will  often  be  saturated  at  the  high 
firing  rates  associated  with  an  intense  break-through  scenario,  there  are 
still  many  opportunities  to  locate  hostile  indirect  fire  positions. 

Appendix  A  contains  a  User's  Guide  on  how  to  set  up  an  input  file 
and  run  the  program.  Appendix  B  contains  a  listing  of  SREM  along  with 
sample  inputs  and  sample  outputs. 

2.  BACKGROUND 

The  French  initiated  experiments  in  sound  ranging  in  September 
1914.  These  experiments  led  to  the  organization  of  sound  ranging  sections 
within  the  French  Army  and  subsequently,  sound  ranging  sections  were  rapidly 
adopted  by  all  of  the  Allies. 

By  1934,  the  first  US  observation  battalion,  under  the  Field  Artil¬ 
lery,  was  activated.  Improvements  made  at  this  time  included  modifications 
to  permit  the  use  of  standard  field  wire,  more  sensitive  microphones, 
improved  designs  of  recording  instruments,  more  accurate  plotting  equipment, 
and  adaptation  of  procedures  to  improve  tactics. 
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During  World  War  II,  the  US  sound  ranging  community  was  expanded 
to  25  full  observation  battalions  for  approximately  75  percent  of  all 
confirmed  targets  located  during  World  War  II. 

By  1950,  when  the  Korean  War  started,  the  1st  Observation  Battal¬ 
ion  was  the  only  organization  of  its  kind  in  the  US  Army,  and  it  was  only 
at  60  percent  full  strength.  By  the  end  of  the  Korean  conflict,  there 
were  four  observation  battalions,  two  of  which  were  in  Korea.  During  the 
Korean  War,  sound  ranging,  on  the  average,  located  4  percent  of  all  active 
batteries  on  a  given  day,  this  represented  59  percent  of  all  locations 
made. 


In  Vietnam,  due  to  the  long  emplacement  time  and  the  large  amounts 
of  wire  necessary,  sound  bases  were  deployed  only  along  the  DMZ,  but  due 
to  the  poor  condition  of  the  equipment  (the  equipment  was  World  War  II 
vintage)  and  the  lack  of  experience  of  the  operators,  sound  ranging  was 
deemed  to  be  of  little  use. 

Figure  1  illustrates  the  typical  deployment  of  a  sound  base.  The 
sound  observers,  labeled  O.P.  initiate  a  paper  tape  strip  recorder,  which 
is  located  at  the  command  post,  when  they  detect  incoming  sounds.  The 
paper  tape  records  the  low  frequency  responses  of  the  six  microphones  on 
six  separate  channels  as  typified  in  Figure  2.  A  three  foot  strip  of  tape, 
corresponding  to  about  six  seconds,  is  activated  by  the  sound  observer. 

The  command  post  crew  would  then  try  to  correlate  the  six  breaks,  one  on 
each  channel,  which  resulted  from  the  same  sound  source.  By  determining 
the  differences  in  times  of  arrival  for  any  two  channels,  a  bearing  to  the 
sound  source  can  be  manually  plotted.  When  the  five  independent  bearings 
all  intersect  closely,  the  weapon  location  has  been  determined.  Figure  3 
demonstrates  which  of  the  sound  "breaks"  in  Figure  2  could  be  correlated  to 
give  sound  locations.  Table  1  lists  the  basic  characteristics  of  the  cur¬ 
rent  US  sound  ranging  system.  Near-term  improvements  to  this  system  in¬ 
clude  replacement  of  wire  by  radio  data  links  and  a  computer  and  CRT  to  as¬ 
sist  in  plotting  the  sound  locations. 

Although  Figure  2  depicts  a  strip  of  tape  with  a  relatively  low 
rate  of  sound  events,  about  25  sound  events  per  minute,  one  can  see  that 
the  art  of  reading  and  correlating  the  breaks  requires  a  high  level  of 
skill  and  proficiency.  In  particular,  it  has  long  been  known  that  high 
rates  of  fire  can  completely  saturate  a  reader's  ability  to  resolve  any 
targets  on  a  tape  in  a  timely  manner. 

To  date,  no  study  has  been  found  which  addresses  the  loading  prob¬ 
lems  a  sound  ranging  system  will  face  in  a  mid-to-high-intensity  scenario. 

The  sound  ranging  effectiveness  model  was  developed  in  order  to  determine 
how  often  a  sound  ranging  system  will  be  saturated,  and  what  target  producing 
capabilities  it  will  have  in  such  a  scenario. 

3.  SREM  DESCRIPTION 

Figure  4  shows  the  basic  flow  diagram  for  the  sound  ranging  effec¬ 
tiveness  model  (SREM). 
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FIGURE  2.  TYPICAL  SOUND  BREAKS  ON  A  PAPER  TAPE  FOR  A  LOW  RATE  OF  FIRE 


FIGURE  3.  CORRELATION  OF  SOUND  BREAKS 


TABLE  1.  SOUND  RANGING  SET  AN/TNS-10  CHARACTERISTICS 
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SOUND  RANGING  EFFECTIVENESS  MODEL 


FIGURE  4  BASIC  FLOW  DIAGRAM 


Step  1  --  missions  are  generated  by  a  two-sided  division  level 
wargame  (DIVLEV)  for  both  Red  and  Blue  direct  and  Indirect  fire 
units  as  well  as  air  support.  These  missions  are  then  used  as 
Inputs  to  SREM. 

Step  2  —  sound  events  are  generated  for  the  following  battle¬ 
field  events: 


muzzle  blasts  from  -  mortars 

cannons 
rockets 
tank  quns 

Impact  blasts  from  -  mortars 

cannons 

rockets 

anti-tank  guided  missiles  (ATGN) 
air-to-ground  missiles,  bombs 

Step  3  —  the  sound  events  are  ordered  by  their  arrival  times  at 
a  sound  ran glnq  microphone. 

Step  4  —  the  loading  effects  on  the  sound  ranging  system  are 
assessed  and  discernible  sound  events  are  identified  based  on 
the  sound  ranging  system  parameters  being  modeled. 

Step  5  —  discernible  sound  events  are  examined  to  determine 
which  events  represent  hostile  artillery  targets  which  could 
be  reported. 


SREM  Inputs. 


Whenever  an  Indirect  fire  mission  Is  generated  In  the  wargame, 
the  following  Information  Is  written  to  an  output  file: 


-  time  of  the  mission 
duration  of  the  mission 
weapon  location 
target  location 
weapon  type 

number  of  weapons  in  the  firing  battery 


When  an  engagement  of  direct  fire  weapons  Is  generated  In  the  wargame,  the 
following  Information  Is  written  to  the  output  file: 


-  time  of  engagement 
duration  of  the  engagement 
weapon  location 
weapon  type 

number  of  rounds  fired  per  minute 


When  an  air  support  mission  Is  generated  by  the  wargame  the  following  1$ 
written  to  the  output  file: 


-  time  the  ordnance  was  delivered 
location  of  the  target 
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type  of  ordnance  delivered 
amount  of  ordnance  delivered 

This  output  file  which  Is  generated  by  the  wargame  Is  then  used  as  the 
Input  file  for  SREM. 

3.2  Generation  of  Sound  Event  Times. 

Sound  event  times  are  generated  based  on  the  times  that  sounds 
would  arrive  at  the  sound  ranging  microphone.  Initial  times  for  each  sound 
event,  that  Is,  the  time  the  sound  events  were  created,  are  based  on  the 
mission  start  time  (from  the  input  file),  and  the  sustained  rate  of  fire 
for  that  weapon.  Initial  times  for  Impacts  are  based  on  the  firing  time 
for  the  weapon  involved  and  the  flight  time  of  the  projectile  (which  Is 
dependent  on  the  weapon-to-target  distance). 

Once  an  Initial  time  for  a  sound  event  is  determined,  the  time 
required  for  the  sound  to  propagate  to  the  sound  ranging  microphone  must  be 
calculated.  The  propagation  time  in  SREM  is  calculated  using  a  constant 
speed  of  sound  (assuming  a  homogeneous  standard  atmosphere)  over  the  distance 
from  the  sound  event  to  the  microphone.* 

3.2.1  Indirect  Fire  Times.  At  the  start  of  each  indirect  fire 
mission,  the  Initial  TTrTng  tfme  for  each  weapon  is  distributed  normally 
about  the  mission  start  time  In  order  to  simulate  crew  reaction  time. 
Subsequent  firing  times  for  each  weapon  are  based  on  a  normal  distribution 
about  the  mean  firing  rate  for  that  weapon.  Table  2  gives  the  standard 
rates  of  fire  for  the  various  Indirect  fire  weapons  which  were  played.  A 
standard  deviation  of  one  tenth  the  time  between  firings  was  used,  and  a 
minimum  firing  time  of  one  third  the  standard  time  between  rounds  was 
imposed.  Firing  times  for  each  weapon  in  that  battery  continue  to  be 
generated  for  the  entire  length  of  the  mission. 

3.2.2  Direct  Fire  Times.  For  direct  fire  engagements,  the  initial 
firing  times  and  the  subsequent  firing  times  are  calculated  using  the  same 
rules  used  for  direct  fire  missions.  However,  the  rate  of  fire  for  these 
engagements  Is  determined  by  the  number  of  rounds  fired  by  that  unit  in 

that  minute;  this  Is  obtained  from  the  input  file.  Two  engagements  of  the 
same  unit,  therefore,  will  not  necessarily  have  the  same  rate  of  fire.  The 
number  of  rounds  fired  is  dependent  on  the  individual  engagement  and  is 
determined  by  the  wargame.  For  direct  fire  missions  consisting  of  tanks 
and  anti-tank  guided  missiles  (ATGM)  only  the  muzzle  blast  from  the  tank 
main  armament,  and  only  the  Impact  sound  from  an  ATGM  are  considered  as 
sound  sources  which  would  register  on  the  sound  ranging  microphone.  The 
Impact  from  a  tank  round  and  the  launch  of  an  ATGM  are  mostly  high  frequency 
sound  events  which  tend  to  be  discriminated  out  at  the  microphone. 


1  The  reader  Is  reminded  that  the  purpose  of  SREM  Is  to  investigate  only  the 
loading  effects  on  sound  ranging  systems;  the  details  of  sound  propagation 
through  moving  and  Inhomogeneous  atmospheres,  although  required  for  accuracy 
calculation.  Is  not  warranted  by  the  one  second  time  resolution  of  SREM. 


TABLE  2.  SUSTAINED  RATES  OF  FIRE 


3.2.3  Air  Support  Times.  Air  support  missions  have  the  number 
and  type  of  ordnance  to  be  delivered  specified.  The  ordnance  is  delivered 
uniformly  over  the  time  period  Indicated  by  the  mission  duration  time. 

3.3  Generation  of  Sound  Intensities. 

The  firing  charge  used  for  each  mission  is  determined  by  first 
computing  the  range  to  the  target;  then  from  the  weapon  firing  tables  one 
of  the  top  three  charges  available  for  firing  that  range  is  selected 
randomly.  The  peak  over  pressure  detected  at  the  sound  ranging  microphone 
is  calculated  using  the  equation: 

P  =  210(wl/3/R) 1-047 

where  P  =  pressure  in  pounds  per  square  inch, 

W  =  equivalent  charge  wei^.t  in  pounds  of  TNT,  and 
R  =  ranqe  in  feet  from  the  sound  source  to  the  microphone. 

This  equation  was  developed  by  curve  fitting  to  data  collected  by  the 
Ballistic  Research  Laboratories  (BRL)  and  reported  in  BRL  Report  #1240. 

SREM  converts  this  pressure  to  amplitude  in  db  for  printout  and  storage. 
Table  3  shows  the  TNT  charges  used  for  approximating  both  muzzle  and  impact 
blasts.  The  charges  are  those  used  for  the  various  missions  fired  in  the 
wargame.  The  equivalent  TNT  charge  weights  have  already  been  taken  to  the 
1/3  power  as  used  in  the  propagation  formula.  It  should  be  noted  that 
these  equivalent  TNT  charges  are  matched  to  far  field  peak  overpressures 
and  are  not  intended  to  reflect  the  destructive  force  from  the  actual  muzzle 
or  impact  blast. 

3.4  SREM  Bookkeeping. 

Sound  events  are  grouped  by  amplitude  and  then  ordered  based  on 
their  arrival  times  at  the  sound  ranging  microphone.  Figure  5  is  a  sample 
output  available  from  SREM.  "MIN"  is  the  minute  of  the  wargame  being  dis¬ 
played.  "SEC"  Is  the  second  in  the  minute  under  consideration.  "TOT"  is 
the  total  number  of  sound  events  In  that  second  which  could  be  detected. 

The  numbers  across  the  top  Indicate  the  amplitudes  at  which  the  sounds 
arrived.  Sounds  arriving  below  70db  in  amplitude  were  considered  too  low 
to  be  detected  and  were,  therefore,  not  Included  in  the  total.  The  numbers 
to  the  right  of  the  slash  Indicate  how  many  of  the  total  number  of  sound 
events  are  Red  indirect  fire  muzzle  events. 

One  of  the  purposes  of  this  model,  given  the  loading  effects  of  a 
scenario,  is  to  evaluate  parametrically  the  target  production  potential  of 
sound  systems  based  on  the  capability  to  discern  sound  sources  whose  sounds 
overlap  In  time  at  the  various  microphones  in  the  sound  base.  Therefore, 
an  Input  parameter  was  Included  which  allows  the  user  to  arbitrarily  define 
when  a  sound  ranging  system  Is  no  longer  capable  of  discerning  targets  due 
to  saturation.  As  the  rate  of  sound  events  reaching  the  sound  ranging 
microphone  Increases,  the  capability  of  the  system  to  discern  targets 
Initially  Increases  proportionally  then  levels  off  and  finally  decreases  due 
to  both  the  overlapping  of  arriving  sound  signatures  and  the  Increased  dif¬ 
ficulty  In  associating  which  of  the  several  sound  breaks  on  each  channel 
corresponds  to  the  same  source.  Within  the  expected  area  of  coverage  of  a 
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WEAPON  TYPE 
155mm  howitzer 


8  inch  howitzer 


81mm  mortar 

4.2  inch  mortar 


120mm  mortar 


122mm  howitzer 


152mm  howitzer 


TABLE  3.  EQUIVALENT  BARE  TNT  CHARGES  USED  TO 
SIMULATE  INITIAL  SOUND  INTENSITIES 


CHARGE 

EQUIVALENT 

Mis^) 

EQUIVALENT  TNT 
CHARGE  USED  FOR 
DETONATION  OF  HE 
(IN  LBS1”) 

3w 

1.46 

2.605 

4w 

1.59 

5w 

1.90 

6w 

2.13 

7w 

3.04 

1 

1.63 

3.311 

2 

1.87 

4 

2.34 

5 

2.50 

6 

2.81 

7 

3.04 

6 

.524 

1.341 

7 

.555 

9 

.617 

19 

.745 

1.983 

20 

.763 

25 

.839 

39 

.921 

40 

.927 

1 

.355 

1.728 

2 

.427 

3 

.479 

4 

.530 

5 

.575 

6 

.618 

4 

.538 

2.089 

3 

1.37 

2 

1.67 

1 

2.02 

Partial 

2.34 

Full 

2.82 

12 

1.48 

1.934 

10 

1.68 

8 

1.90 

5 

2.28 

3 

2.50 

1 

2.56 

Full 

2.63 
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TABLE  3.  CONTINUED 


EQUIVALENT  EQUIVALENT  TNT 

TNT, CHARGE  , /,  CHARGE  USED  FOR 

W1/3(IN  LBS1'  ;  DETONATION -OF  HE  ROUND 

WEAPON  TYPE  CHARGE  (IN  LBS 


122mm  MRL 

130nm  gun  4 

3 

2 

1 

Fun 

125mm  tank  gun 

175mm  gun  1 

2 

3 

105mm  tank  gun  . 

CBU-24 

Rockeye 

Maverick 

RBK-500 

RBK-250 

500  lb  bomb 


.073 

2.089 

.186 

2.089 

.280 

.401 

.629 

1.05 

2.50 

2.90 

3.288 

3.43 

3.95 

2.29 

4.54 


4.10 

3.50 

4.54 

4.10 

5.76 
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MIN  =  0713  AMPLITUDE  IN  DB 


FIGURE  5  .  SAMPLE  SREM  OUTPUT 


linear  sound  base  (In  a  linear  sound  base  the  microphone  are  placed  1 
sound  sec  apart),  the  arrival  times  at  six  microphones  from  a  single  sound 
source  will  usually  occur  within  6  seconds.  This  Input  parameter,  there¬ 
fore,  Is  defined  In  terms  of  the  number  of  sound  events  arriving  in  a 
6-second  window  at  a  single  point.  The  point  chosen  for  measuring  the 
number  of  sound  events  should  represent  the  center  of  the  sound  base  de¬ 
ployed.  In  this  way  sound  events  have  already  traversed  three  microphones 
by  the  time  the  model  detects  them.  A  location  can  be  made  wlh  Information 
from  3  channels  (accuracy  Improves  with  additional  information  from  other 
channels).  Therefore,  using  a  six  second  window  insures  that  a  sound  event 
has  or  will  have  traversed  at  least  three  sound  ranging  microphones  during 
that  6  second  period  and  that  a  location  can  be  determined  for  each  sound 
event  detected  in  a  six  second  window  where  the  CT  has  not  been  execeeded. 

This  input  parameter,  which  we  call  the  critical  threshold  (CT), 
is  defined  as  the  maximum  number  of  sound  events  that  may  occur  during  a 
6-second  period  In  which  It  is  still  possible  to  discern  targets.  By 
varying  the  critical  threshold,  various  sound  ranging  capabilities  can  be 
modeled.  The  user  should  take  care  to  identify  all  the  variables  which 
will  reduce  the  point  at  which  a  particular  system  will  saturate  (the  CT), 
since  the  results  obtained  are  very  dependent  on  this  parameter. 

Once  all  the  sound  events  are  generated,  the  output  is  scanned 
with  a  6-second  window.  If  the  total  number  of  sound  events  in  the  window 
is  less  than  CT  then  all  the  Red  muzzle  events  in  that  6-second  window  are 
counted  as  discernible.  The  number  of  discernible  Red  muzzle  events  in 
that  window  is  then  used  to  Increment  how  often  that  number  of  targets 
could  be  detected  at  the  current  rate  of  fire.  The  Combat  Surveillance  and 
Target  Acquisition  Lab  at  Ft.  Monmouth,  NJ  performed  an  analysis  on  the 
capabilities  of  sound  ranging;  part  of  their  results  are  summarized  in 
Figure  6. 


Figure  6*  represents  the  resolvable  combinations  per  minute  for  a 
given  number  of  arrivals  per  minute.  This  would  represent  the  limiting 
capabilities  of  a  completely  automated  system  in  a  steady  state  condition. 
This  also  represents  the  physical  limitations  on  sound  ranging.  For  example, 
the  curve  labeled  “5  of  6"  is  the  theoretical  limit,  assuming  that  the 
interarrival  times  on  each  channel  are  distributed  exponentially  and  inde¬ 
pendently,  that  at  least  five  out  of  six  channels  will  have  sound  breaks 
which  do  not  overlap  any  of  the  other  breaks  on  each  of  those  channels. 
Another  way  of  understanding  the  curves  displayed  in  Figure  6  is  to  assume 
a  limiting  capability  on  a  particular  system.  For  example,  if  a  system  had 
6  channels  and  required  unmasked  sound  breaks  on  at  least  4  channels  then 
the  curve  "<^  4  of  6H  would  represent  its  capabilities,  however,  if  that 
same  system  required  unmasked  sound  breaks  on  at  least  5  channels  then  its 
capability  would  be  reduced  to  that  labeled  V  5  of  6."  This  figure  also 
demonstrates  that  If  you  have  a  large  number  of  microphones,  then  the 
probability  of  having  unmasked  sound  breaks  on  at  least  5  channels  Is  much 
higher,  which  is  only  logical.  It  is  noted  that  the  abscissa  for  these 


1  Figure  6  was  provided  by  the  Combat  Surveillance  and  Target  Acquisition 
Laboratory,  Fort  Monmouth,  NJ. 
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FIGURE  6.  SOUND  RANGING  CAPABILITIES  (Figure  provided  by  Combat  Surveillance 
and  Target  Acquisition  Laboratory,  Ft.  Monmouth,  NJ) 


curves  is  the  average  number  of  sound  events  arriving  per  minute  -  not  the 
rate  of  fire  -  and  that  the  ordinate  shows  how  many  of  these  events  could 
be  resolved. 

3.5  Outputs. 

SREM  provides  the  user  with: 

•  a  time  history  of  when  and  how  many  targets  were  acquired 
as  well  as  the  number  of  these  that  would  be  unique 
targets 

•  percent  of  game  time  a  sound  ranging  system  would  be 

able  to  locate  1,2,3, .  etc.  Red  muzzle  events  for 

all  rates  of  fire  in  the  game 

•  based  on  results  obtained  at  the  different  rates  of  fire, 
SREM  computes  what  percent  of  game  time  a  sound  ranging 

system  would  be  able  to  locate  1,2,3 . etc.  Red 

muzzle  events  assuming  the  rate  of  fire  was  held  constant 

•  percent  of  game  time  for  each  rate  of  fire 

3.6  Sample  Results. 

For  the  purposes  of  this  analysis,  it  was  assumed  that  a  critical 
threshold  (CT)  of  6  was  equivalent  to  the  capabilities  of  a  present  day 
manual  system  comparable  to  that  of  an  AN/TNS-10.  A  CT  of  12  was  assumed 
to  be  equal  to  the  capabilities  of  an  achievable,  automated  system.  The 
limiting  potentials  of  these  two  systems  are  shown  in  Figures  7A  and  7B. 

For  the  manual  system  (Figure  7A)  the  potential  for  locating  sound  events 
increases  linearly  as  a  function  of  total  battlefield  rounds  per  minute  to 
a  maximum  of  30  locations  per  hour  at  30  rounds  per  minute.  Beyond  30 
rounds  per  minute  the  capability  decays  rapidly  until  slightly  above  100 
rounds  per  minute  the  system  becomes  saturated  and  no  sound  event  locations 
could  be  discerned.  However,  due  to  the  processing  time  involved  in  reading 
the  charts,  plotting  the  sound  breaks  and  calculating  the  locations,  this 
system  is  saturated  at  30  locations  per  hour.  For  the  automatic  system 
(Figure  7B)  the  potential  for  locating  sound  events  increases  linearly 
as  a  function  of  total  battlefield  rounds  per  minute  to  a  maximum  of  60 
locations  per  minute  at  60  rounds  per  minute,  the  automatic  system's  capa¬ 
bility  also  decays  rapidly  until  at  approximately  200  rounds  per  minute 
this  system  also  becomes  saturated  and  can  produce  no  locations. 

3.7  Sample  Scenario. 


A  sample  scenario  consisting  of  3  1/2  hours  of  daytime  and  3  1/2 
hours  of  nighttime  combat  was  exercised  using  DIVLEV,  AMSAA's  two-sided 
division  level  wargame.  The  artillery  force  composition  is  listed  in  Table 
4.  All  the  required  Inputs  were  extracted  from  both  scenarios  and  SREM  was 
executed,  modeling  the  capabilities  of  both  a  manual  and  an  automatic  system 
as  mentioned  above. 
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POTENTIAL  POTENTIAL 

TARGETS  TARGETS 

PER  MIN  PER  HOUR 


TOTAL  BATTLEFIELD  ROUNDS/MIN 

FIGURE  7A.  Potential  Target  Production  for  a  CT=6  System  with 
a  2  Minute  Target  Processing  Time 


TOTAL  BATTLEFIELD  ROUNDS/MIN 

FIGURE  7B.  Potential  Target  Production  for  a  CT=12  System  with 
a  Negligible  Target  Processing  Time 
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For  the  3  1/2  hours  of  daytime  combat  (a  covering  force  scenario), 
Figure  8  shows  the  distribution  of  rates  of  fire  by  percent  of  game  time. 
Applying  the  capabilities  of  botl.  a  manual  and  automatic  system  as  described 
above,  a  manual  system  (whicn  is  only  operable  at  rates  of  fire  below  100 
rounds  per  minute)  would  be  capable  of  making  locations  less  than  1  percent 
of  the  game  time.  An  automatic  system  (operable  below  200  rounds  per 
minute)  would  be  capable  of  making  locations  approximately  9  percent  of 
the  game  time. 

Figure  9  shows  the  distribution  of  rates  of  fire  by  percent  of 
game  time  for  the  3  1/2  hours  of  night  combat  (which  is  nearer  to  the  main 
battle  area).  Again  applying  the  two  diffrent  capabilities,  a  manual  system 
would  still  be  limited  in  the  amount  of  time  it  could  be  productive  to  less 
than  4  percent:  however,  an  automatic  system  in  this  scenario  would  remain 
operable  approximately  33  percent  of  the  game  time. 

3.8  Sample  Outputs. 

The  capabilities  of  both  a  manual  and  an  automatic  sound  ranging 
system  were  modeled  in  SREM  for  both  3  1/2  hour  segments  of  game  time. 

Figure  10  shows  for  the  daytime  3  1/2  hours  of  combat,  the  cumulative 
number  of  unique  Red  artillery  batteries  located  as  a  function  of  game  time 
for  capabilities  representing  a  manual  system.  During  the  first  hour  there 
was  a  relative  lull  during  which  five  targets  could  be  located.  For  the 
next  2  hours,  the  system  was  totally  saturated  until  just  past  seven  when 
one  more  location  was  made.  Figure  11  gives  the  cumulative  unique  Red 
artillery  batteries  located  as  a  function  of  game  time  for  the  capabilities 
representing  an  automatic  system.  During  the  early  lull  that  the  manual 
system  was  capable  of  making  five  locations,  the  automatic  system  was  able 
to  make  nine  locations.  For  the  next  90  minutes  this  system  was  also 
saturated.  When  the  next  lull  in  the  firing  occurred,  the  automatic  system 
was  able  to  locate  19  additional  Red  artillery  batteries,  compared  to  one 
additional  location  for  the  manual  system  for  the  same  time  period. 

Figure  12  is  a  manual  system's  capabilities  during  the  3  1/2-hour 
nighttime  segment  of  the  battle.  During  the  first  hour  there  was  enough 
activity  left  from  the  daytime  to  saturate  this  system;  there  was  then  a 
half  hour  lull  during  which  10  Red  artillery  batteries  could  be  located, 
but  for  the  rest  of  the  scenario  this  system  was  totally  saturated.  Figure 
13  shows  the  automatic  system's  capabilities  during  the  same  time  period. 

The  automatic  system  was  able  to  take  advantage  of  the  slightly  lower  rates 
of  fire  for  the  first  hour  and  45  minutes.  During  the  next  hour,  there  was 
an  attempted  river  crossing  during  which  the  rates  of  fire  increased  to 
the  point  where  they  saturated  the  automated  system.  During  the  last  45 
minutes,  the  system  was  again  capable  of  producing  targets  at  a  usable 
rate.  Figure  14  i s  a  summary  showlnq  the  total  number  of  unique  Red  bat¬ 
teries  located  during  both  3  1/2-hour  segments  of  game  time  by  the  manual 
and  automatic  systems.  This  shows  that  increasing  sound  ranging  capabili¬ 
ties  to  even  a  modest  automated  system  increases  the  number  of  locations 
four  to  five  times. 

Figures  15-18  show  the  target  production  capability  as  a  function 
of  rate  of  fire  for  both  the  manual  and  automated  systems.  The  rate  of 
fire  in  these  graphs  was  based  on  continuous  fire  at  rates  generated  by 
0IVLEV. 
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UNIQUE  TARGETS  LOCATED  BY  A  MANUAL  SYSTEM 
IN  THE  SAMPLE  HIGH  INTENSITY  SCENARIO 


AUTOMATIC  SYSTEM  (012) 
DAYTIME  SCENARIO  (HIGH  INTENSITY) 
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FIGURE  11.  UNIQUE  TARGETS  LGCATED  BY  AN  AUTOMATIC  SYSTEM  IN  THE  SAMPLE 

HIGH  INTENSITY  SCENARIO 
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AUTOMATIC  SYSTEM  (CT  =  12) 
NIGHTTIME  SCENARIO  (MODERATE  INTENSITY) 
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FIGURE  13.  UNIQUE  TARGETS  LOCATED  BY  AN  AUTOMATIC  SYSTEM 
IN  THE  SAMPLE  MODERATE  INTENSITY  SCENARIO. 
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FIGURE  14.  SUMMARY  OF  UNIQUE  SOUND  RANGING  ACQUISITIONS 
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MANUAL  SYSTEM  (CT=6) 
STEADY  STATE  CONDITIONS 
(mid  intensity) 


FIGURE  15  RATE  OF  UNIQUE  TARGET  PRODUCTION  AS  A  FUNCTION 
OF  THE  RATES  OF  FIRE  IN  THE  SAMPLE  MODERATE  INTENSITY  SCENARIO 


UAL  SYSTEM  (CT=6) 

DY  STATE  CONDITIONS 


FIGURE  16  RATE  OF  UNIQUE  TARGET  PRODUCTION  AS  A  FUNCTION  OF  THF  RATES 
OF  FIRE  IN  THE  SAMPLE  HIGH  INTENSITY  SCENARIO 


AUTOMATIC  SYSTEM  (CT=12) 
STEADY  STATE  CONDITION 

(MID  INTENSITY) 
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RATE  OF  FIRE  (NIGHT) 

FIGURE  17  RATE  OF  UNIQUE  TARGET  PPOPllCTMN  AS  A  FUNCTION  OF  THE  RATES 
OF  FIRE  IN  THE  SAMPLE  MODERATE  INTENSITY  SCENARIO 
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FIGURE  18  RATE  PF  UNIQUE  TARGET  PRODUCTION  AS  A  FUNCTION  OF  THE  RATES 
OF  FIRE  IN  THE  SANPLE  HIGH  INTENSITY  SCENARIO 


Figures  19-22  show  the  cumulative  number  of  red  Indirect  artillery 
weapons  capable  of  being  located  as  a  function  of  game  time.  When  compared 
to  the  unique  number  of  batteries  capable  of  being  located  it  can  be  seen 
that  many  batteries  could  have  been  located  several  times. 

In  a  tactical  situation,  however,  rates  of  fire  rarely  remain  con¬ 
stant  for  more  than  a  few  seconds.  When  the  average  rate  of  fire  is  high 
it  may  be  possible  to  still  locate  some  targets  during  lulls  in  the  firing. 
For  the  purpose  of  giving  the  reader  a  feel  for  these  tactical  fluctuations, 
the  resolvable  targets  displayed  in  Figures  15-18  are  also  given  in  Figures 
23-26,  where  in  the  latter  figures  the  rates  of  fire  are  averaged  over  a 
five  minute  period  around  the  six  second  window  used  for  determining  the 
number  of  discernable  targets.  In  Figures  23-26,  the  potential  of  the  hypo¬ 
thetical  sound  systems  to  locate  hostile  indirect  fire  weapons  depends  on 
the  tactical  fluctuations  in  the  overall  rates  of  fire  as  well  as  the  sound 
system  resolving  capability. 

4.  SUMMARY 

The  Sound  Ranging  Effectiveness  model  was  not  designed  to  model 
any  one  system.  SREM  provides  the  distribution  of  sound  events  down  to  a 
1-second  resolution  as  would  be  expected  in  a  tactical  situation.  The  use 
in  SREM  of  a  critical  threshold  (CT)  is  a  simplified  parametric  approach 
to  modeling  various  sound  ranging  capabilities.  In  the  event  the  user 
wishes  to  model  a  specific  system  in  greater  detail,  SREM  has  been  set  up 
to  allow  the  user  to  easily  add  subroutines  reflecting  their  system  model. 

The  program  will  provide  a  sliding  6-second  window  which  may  be  examined 
by  any  subroutines.  The  6-second  window  will  contain  the  amplitude  and 
type  of  every  sound  event  occurring  in  this  window. 

SREM  has  been  developed  to  address  the  problems  of  loading  and 
saturation  of  sound  ranging  systems.  As  such,  it  can  provide  to  the  analyst 
estimates  of  sound  ranging  performance  or.  to  the  designer,  future  system 
requirements  based  on  various  scenarios.  The  authors  feel  that  the  passive 
operation  and  relatively  low  cost  rffak'e  future  automatic  sound  ranging 
systems  viable  candidates  for  helping  to  satisfy  the  Army's  counterbattery 
target  acquisition  needs.  Although  not  addressed  in  this  model,  improved 
meteorological  data  acquisition  systems  and  numerical  plotting  solutions 
are  being  developed  which  significantly  improve  sound  ranging  accuracy  as 
compared  with  past  capabilities.  Accuracies  better  than  50  meters  can  be 
expected  under  favorable  conditions  such  as  nighttime  or  fog  (utilizing  short 
base  subarrays  and  cross  correlation  techniques).  It  is  also  clear  that 
future  sound  systems  for  the  fast  moving  European  scenarios  will  have  to 
use  radio  links  and  automatic  positioning  systems  which  are  under  development 
to  greatly  enhance  mobility  over  what  has  been  achievable  in  the  past. 

In  short,  with  improved  accuracy  and  mobility  on  the  horizon, 
the  use  of  microprocessors  for  signal  processing  and  mini  computers  for 
numerical  plotting  solutions  would  make  automatic  sound  ranging  a  consider¬ 
able  target  acquisition  asset  as  illustrated  in  SREM  example  scenario. 


38 


E  SCENARIO  (HIGH  INTENSITY) 


RGETS  LOCATED  BY  A  MANUAL  SYSTEM  IN 
LE  HIGH  INTENSITY  SCENARIO 


AUTOMATIC  SYSTEM  (CT=12> 
DAYTIME  SCENARIO  (HIGH  INTENSITY) 


TIME 

FIGURE  20  TOTAL  TARGETS  LOCATED  BY  AN  AUTOMATIC  SYSTEM  IN  THE 
SAMPLE  HIGH  INTENSITY  SCENARIO 


FIGURE  21  TOTAL  TARGETS  LOCATED  BY  A  MANUAL  SYSTEM 
IN  THE  SAMPLE  MODERATE  INTENSITY  SCENARIO 


AUTOMATIC  SYSTEM  (CT-12) 
NIGHTTIME  SCENARIO  (MODERATE  INTENSITY) 


FIGURE  22  TOTAL  TARGETS  LOCATED  BY  AN  AUTOMATIC  SYSTEM 
IN  THE  SAMPLE  MODERATE  INTENSITY  SCENARIO 


FIGURE  23  RATE  OF  UNIQUE  TARGET  PRODUCTION  AS  A  FUNCTION 
OF  THE  RATE  OF  FIRE  IN  THE  SAMPLE  HIGH  INTENSITY 
SCENARIO 
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APPENDIX  A 


THE  SOUND  RANGING  EFFECTIVENESS  MODEL  (SREM) 

USER'S  GUIDE 

SREM  is  designed  to  examine  the  loading  problems  a  sound  ranging  sys¬ 
tem  will  experience  in  a  given  scenario.  To  do  this,  SREM  re'eives  as 
input  both  Red  and  Blue,  direct  and  indirect  firing  missions  and  Close  Air 
Support  missions.  Sound  events  are  generated  for  each  of  these  missions 
to  account  for  the  muzzle  blast  for  artillery,  and  the  impact  sound  event 
for  artillery,  direct  fire  and  Close  Air  Support  missions.  These  sound 
events  are  then  time  ordered  based  on  the  time  they  would  reach  the  sound 
base  and  are  then  examined  to  see  when  the  sound  ranging  system  being 
modeled  would  be  capable  of  making  locations.  SREM  also  keeps  track  of 
Red  muzzle  events  so  that  when  the  sound  system  is  capable  of  making  loca¬ 
tions,  it  counts  the  number  of  unique  Red  muzzle  events  which  would  be 
available  to  be  located.  v 

SREM  requires  the  initialization  of  the  sound  base  location,  start  and 
stop  times,  one  parameter  describing  the  saturation  limit  if  the  system 
being  modeled,  and  one  describing  the  resolution  in  terms  of  rate  of  fire 
you  wish  to  have  in  the  results.  The  initialization  procedure  and  where  to 
locate  the  required  data  statements  are  described  in  detail  in  this  guide. 

The  Sound  Ranging  Effectiveness  Model  is  presently  configured  to 
receive  its  inputs  from  DIVLEV,  a  two-sided  division  level  wargame,  DIVLEV 
generates  an  input  file  which  is  later  read  by  SREM.  In  the  event  the  user 
wishes  to  generate  an  input  file,  the  format  required  for  this  file  is 
included. 

The  sound  ranging  effectiveness  model  was  written  on  a  CDC  7600  computer 
and  contains  some  coding  peculiar  to  that  system.  The  following  are  CDC 
unique  and  will  have  to  be  changed  if  the  program  is  run  on  a  different 
system. 


1.  The  first  line  of  Lhe  program  is  a  program  statement  which  declares 
how  files  are  to  be  used. 

2.  Several  large  arrays  are  found  in  "LEVEL  2"  statements,  this  places 
these  arrays  in  an  auxiliary  portion  of  memory.  These  are  large  arrays  and 
some  provision  may  be  required  in  order  to  handle  them. 

Required  initialization  inputs  for  SREM 

o  Location  of  sound  base  to  nearest  100  meters* 


The  user  should  be  careful  to  note  if  any  special  coordinate  systems  are 
being  used  to  create  the  input.  SREM  assumes  all  oordi nates  are  given  to 
the  nearest  100  meters. 


ESNDBS  =  Easting 
NSNDBS  =  Northing 


3  Digit  UTM  coordinate 
3  Digit  UTM  coordinate 


•  Starting  time  = 

MASTIM  -  standard  military  time. 

t 

The  starting  time  need  not  agree  with  the  starting  time  of 
the  input  file.  The  program  will  step  through  the  input 
file  until  a  time  equal  to  MASTIM  is  reached. 

•  Stop  time  = 

MAXTIM  -  Standard  military  time. 

If  the  simulated  time  step  reaches  this  time  before  it  reaches 
the  end  of  file  SREM  treats  it  as  an  end  of  file. 

e  Critical  threshold 

CT  =  Maximum  number  of  sound  events  occurring  in  a  6-second 
period  during  which  all  sound  events  in  that  window  could  be 
located.  (Max  =  18) 

•  Method  of  calculating  Rate  of  Fire 

SYS  =  1,  Rate  of  fire  is  calculated  by  the  5-minute  average 
rate  of  fire  immediately  preceding  the  6-second  window  in 
question. 

=  2,  Rate  of  fire  is  calculated  by  taking  the  number  of 
muzzle  events  in  the  6-second  window  and  extrapolating  it 
to  1  minute. 

a  Resolution  of  Summary  output 

ROF  =  Increment  of  rate  of  fire  for  summary  outputs,  (i.e., 

R0F=25  will  display  all  outputs  on  rate  of  fire  steps  of  25.) 

All  the  required  inputs  for  initialization  can  be  found  in  data  state¬ 
ments  in  the  main  routine.  The  locations  of  the  various  data  statements 
are  in  Table  1. 

The  input  file  must  be  unformatted  records  eight  words  per  record. 
Records  are  read  into  array  MI  SHUN  one  at  a  time.  The  records  for  indirect 
fire  missions  must  follow  the  format  found  in  Table  2,  for  a  direct  fire 
mission  Table  3,  and  for  a  close  air  support  mission  Table  4. 
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TABLE  1 

LOCATION  OF  DATA  STATEMENTS  FOR  INITIALIZATION 


•  Sound  Base  location 

Easting  (ESNDBS)  =  line  30  main  routine 
Northing  (NSND6S)  =  line  31  main  routine 
§  Starting  time 

MASTIM  =  line  32  main  routine 

•  Stop  time 

MAXTIM  =  line  33  main  routine 

•  Critical  threshold 

CT  =  line  34  main  routine 

•  Method  of  calculating  rate  of  fire 

SYS  =  line  35  main  routine 

•  Resolution  of  outputs 

ROF  =  line  36  main  routine 
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TABLE  2 

SREM  INPUT  FILE  (MISHUN  (I),  I  *  1,8) 


•  Artillery  Missions  (indirect  fire) 

MISHUN  (1)  =  Number  of  weapons  in  this  battery. 

MISHUN  (2)  =  Time  this  artillery  mission  will  begin. 

MISHUN  (3)  =  Easting  coordinate  of  target  to  nearest  100  meters. 

MISHUN  (4)  =  Northing  coordinate  of  target  to  nearest  100  meters. 

MISHUN  (5)  =  Duration  of  this  mission. 

MISHUN  (6)  =  Easting  coordinate  of  firing  weapon  to  nearest  100  meters. 
MISHUN  (7)  =  Northing  coordinate  of  firing  weapon  to  nearest  100  meters. 
MISHUN  (8)  =  Coded  number; 

First  3  digits  =  unique  3  digit  identifier  for  this  battery. 
Second  2  digits  =  resource  number  (See  Table  5) 

Last  digit  3  force;  1  ■  Blue 
2  =  Red 
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TABLE  3 


Direct  Fire  Missions 

MISHUN  (1)  =  Number  of  rounds  fired  in  this  minute  by  this  weapon. 

MISHUN  (2)  =  Time  this  direct  fire  mission  began. 

MISHUN  (3)  and  MISHUN  (4)  =  Zero  (0) 

MISHUN  (5)  =  Duration  of  this  firing  mission  (in  minutes)- 
MISHUN  (6)  =  Easting  coordinate  of  weapon  firing  to  nearest  100  meters. 
MISHUN  (7)  =  Northing  coordinate  of  weapon  firing  to  nearest  100  meters. 
MISHUN  (8)  =  Coded  number  (same  as  indirect  fire). 


TABLE  4 


•  Close  Air  Support  Mission 
MI SHUN  (1)  =  Coded  number; 

First  digit  =  type  of  ordnance  as  follows: 

BLUE _ TYPE  # _ RED 

CBU  -  24  1  RBK  -  500 

Rockeye  2  RBK  -  250 

Maverick  3  500  LB  Bomb 

Last  2  digits  =  number  of  sticks  of  this  type  ordnance. 

A  stick  is  as  follows: 

CBU-24 

Rockeye  y  8  each 
RBK- 500  I 

RBK-250  J 

Maverick  -  2  each 

500  lb  Bomb  -  2  each 

MISHUN  (2)  =  Time  this  ordnance  was  delivered. 

MISHUN  (3)  =  Easting  coordinate  for  this  target  to  the  nearest  100  meters. 
MISHUN  (4)  =  Northing  coordinate  for  this  target  to  the  nearest  100  meters. 
MISHUN  (5)  =  One  (1) 

MISHUN  (6)  and  MISHUN  (7)  =  Zero  (0) 

MISHUN  (8)  =  Coded  number  (same  as  direct  fire). 
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TABLE  5 


Blue  Weapon 

Resource 

,  Number 

Red  Weapon 

M60A3  Tank  v//  105mm  pun 

2 

T72  tank  w/125mm  pun 

3 

i  * 

APC,  BMP  w/Saaper 

Cobra/ tow 

5 

HINO-A  w/Sagper 

Mortar,  Sinn  (H29A1) 

6 

Mortar,  120m  (ml938-43) 

1 

9 

BRDM  w/Sagper 

155m  Howitzer  SP  (M109A1) 

n 

122m  Howitzer  (D-30) 

8-inch  Howitzer  SP  (M110E2) 

12 

152mm  G/H  (D-20) 

175m  dun  SP  (M107) 

13 

!  122mm  MRL  (BM-21) 

1 

M113A1  w/tow 

20 

Sagger,  Manpack 

Tow,  Ground  Mounted 

21 

122mm  Howitzer,  SP(M1974) 

22 

152mm  G/H,  SP  (M1973) 

Mortar,  4.2-inch  SP 

28 

130mm  Gun  (M-46) 

36 

240mm  MRL 

Jet  Aircraft,  CAS 

37 

i 

Jet  Aircraft,  CAS 

Next  page  is  blank. 
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APPENDIX  B 


SAMPLE  RUN 

A  10-minute  simulation  was  set  up  for  demonstration  purposes.  The 
initialization  values  used  are  in  Table  B-l.  The  input  records  used  are  in 
Table  B-2.  Figures  B-l  through  8-11  contain  the  minute  by  minute  record 
available  as  an  output  of  all  the  sound  events.  This  output  is  described 
in  detail  on  page  of  the  main  report.  Figure  B- 12  is  an  output  which 
provides  the  average  number  of  Red  muzzle  events  when  the  total  number  of 

sound  events  was  1,2,3,  .  etc.  Figures  B- 13  and  B-14  are  outputs  which 

provide  for  each  minute  of  the' game  the  total  number  of  potential  targets 
and  the  total  number  of  unique  targets  respectively. 

Figure  B-15  provides  for  each  rate  of  fire  band,  what  percentages  of 
the  total  game  time  a  sound  ranging  system  would  be  capable  of  locating 
0,1, 2, 3,  ...  etc.  weapons.  For  example,  the  rate  of  fire  was  between  25 
and  50  rounds  per  minute  and  it  was  possible  to  locate  2  Red  muzzle  events 
14.44  percent  of  the  total  game  time.  *lso,  the  rate  of  fire  was  between 

25  and  50  rounds  per  minute  and  no  Red  muzzle  events  occurred  during  22.5 

percent  of  the  total  game  time. 

The  "LOST"  column  indicates  what  percentage  of  the  game  time  there 
were  Red  muzzle  events  but  the  threshold  was  exceeded  and  no  locations 
could  be  made.  The  "TOT"  column  indicates  what  percentage  of  game  time  the 
rate  of  fire  fell  within  that  band. 

Based  on  the  previous  outputs,  it  was  determined  what  percentage  of 
the  time  it  was  possible  to  locate  1,2,3,  ...  etc.  Red  muzzle  events  when 
the  rate  of  fire  was  within  a  specific  band. 

For  example,  in  Figure  B- 16  under  the  column  marked  ”2"  and  in  row 

marked  "25  -  50"  you  will  find  the  number  15.07.  This  indicates  that  15.07 
percent  of  the  time  that  the  rate  of  fire  was  within  the  25  -  50  rounds  per 
minute  band,  it  was  possible  to  locate  2  Red  muzzle  events. 

Figure  B- 17  is  a  5-minute  moving  average  of  the  rate  of  fire  by  bands. 
Since  this  was  a  very  short  run,  all  the  rates  of  fire  fell  within  25  -  50 
rounds  per  minute. 
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SAMPLE  INPUTS 


Below  are  the  inputs  for  the  sample  run. 

ESMDBS  =  460 
NSNDBS  =  230 

The  sound  base  is  located  at  460  east,  230  north,  (SREM  assumes 

100  meter  accuracy. ) 

MASTIM  -  10430 

The  start  time  for  this  run  will  be  day  1  at  0430.  (SREM  has  a 
1  minute  time  resolution.) 

MAXTIM  =  10441 

The  stop  time  for  this  run  will  be  day  1  at  0441.  (SREM  stops 
when  it  reaches  this  time,  any  inputs  with  this  time  will  be 
ignored. ) 

CT  =  6 

The  system  being  modeled  in  this  run  has  the  capability  of  discerning 
targets  when  there  are  no  more  then  6  overlapping  sound  events  in 
a  six  second  window. 

SYS  =  1 

For  this  output  we  wish  to  have  the  rates  of  fire  calculated 
based  on  the  5  minutes  immediately  preceding  the  six  second  window. 

R0F  =  25 

All  the  outputs  for  this  run  will  be  displayed  in  rate  of  fire 
steps  of  25. 
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FIGURE  B-l 


FIGURE  B-3 
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G.00 

C.00 

c.co 
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PROGRAM  SKEM.(INPUT*nimUT>TAPE:j«INFUT,TAPEb»UOTPUT,Ut?UG«CLTPbT) 
IMPLICIT  INTEGER  (A-Z) 

REAL  P 

COKMUN/RLK i/MISHLNlbC  » /BLK?/E5NDBS»N SNOBS /8LK7/NC/8LK9/MA  ST  IN 
C.  MMUN  /  iLK12/CT»  r  YS»kOf 
b I  MEN 5 1  ON  AfrTUm 
DATA  E SNCf S/246 0/ 

*  #N‘SNDBS/2230/ 

*  #MAST  I*/lb431/ 

*  >MAXTlM/10441/ 

*  » CT  /  6/ 

*  >SYS  nt 

*  ttoiv  t?.t / 


TY p  «  1  -  1  S i HO* 1 T  2 1  k - 21 

*  ?  -  8  INCH - 22 

C  *  3  -  PIMM  r C P T  A P - - - 23 

C  ■  4  -  4.2  INCH  MORTAR - 24 

C  *  5  -  120PM  POETA* - 2 !> 

C  *  6  -  122MM  HOWITZER - 26 

C  •  7  li2*M  C./H - 27 

C  *  *  122  MEL - 2 P 

C  »  ri  1 3 Of-  M  GUN - : - 2b 

C  •  lu  T 72-1 2  f  MM - 3 C 

C  =  li  SAGG6F  - 31 

C  «  1?  24'jMM  MRL - 32 

C  -  13  M  6  b  A  3  W/105MM - 3? 

C  «  14  TO* - 34 

C  «  1  f  176  MM  GIN - 3 1 

C  •  lo  CAt  MISSION - 36 

C 

N  C  *  ’• 

ICALl  «  ; 

CALI  NR  AN31  (PAM  ,  Z»NC  ) 

C 


C  PEAT  IN  SOUND  P  6  S  E  LOCATION  •  ' 

C 

ICO  FCF  M  AT ( 2  I  2>  15) 

I C  NT ■ 1 
C 

C  PEAT  IN  ARTILLERY  MISSION 

C 

2  ;o  Pf  A.  ( «- )  (MSHUMi)»I  •  1*3) 

IF  <  EOF  (5  nilCC  »  260 
2-,'  COMINUE 

IF  ( M  I  SHUN ( 2  )  .LT.  MAST1M)  GU  TO  200 
I F  (M.iSHUM  1  )  .it.  f  |  GO  TO  2CC 
CALL  TYFc(MISHUN» IT YPt»  f FGPC  E»IPf  S  ) 

If  <  ITYPF  .  to.  C  )  C-r  TU  200 
CALL  UMOID 
lit  CONTTNUr 
C 

C  IF  T  H I ‘  is  THE  IIP5T  MISSION  SKIP  COMPARISON 

A  *  1 

I F ( I C n T  .tC.  1)  GO  TO  200 
C 

G  C:'*,PA-,E  THIS  TIM'-  TO  LA'T  MISSION 
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IF  <*UH0N<2)  .Eu.  FAST JK  >  GC  TC  30G 
GG  TO  3$'j 

300  C/IL  FI«FTH<A> 

ICNT-ICNTU 
DC  310  L»l#e 

310  APT  11 (l  I  ■  HI  SHUN (LI 
GC  TO  200 
C 

C  ST GS  E  THIS  HISSJUN 

C 

35C  00  35t>  I  »  l#fc 

355  ARTItll l-HISHUNCIl 
A  •  2 

CALI  FIRETH(A) 

KASTIN  «  HAS T 1 H* 1 
IB  •  HASTIH/10C. 

TK  •  MASTlr  -  (Ifi  *  AGO 
IF  ( TH  .Nt.  59)  GO  TO  35t 
HA S T IK  •  HASTJH  ♦  A1 
306  CONTINUE 
Gu  TO  790 
C 

C  GFT  P IkFT IKES  F GP  STOPEP  HISS10N 

C 

3b}-;  OC  36C  I  ■1*6 
36-:  HTSHUM  1  l-AFTIH  1 ) 

GO  TO  110 
7 OC  CONTINUE 

CALL  POPUP  <  HAST  1 K I 
CALL  0UTSGMHAS71H,/CAtU 
KALI  •  IC At L  ♦  1 
CALL  PRINT  IKAST1HI 
8  ■  MASTIH. 

3  •  P/UO, 

IH  ■  B 

T K  «  M  AST  IH  -  US  *  ICO 
I F  (  T  H.  .ME.  59)  GC  TC  795 
HAST  IF  •  FASTI  K  4  4C 
79*  CONTINUE 

HASTIH  •  HAST1K41 
IF  (HASTIH  .EO.  FAATIH)  GO  TO  Il’JG 
lOOt.-  Gf  TP  35  e 
11*0  CONTINUE 

KA5TIH  »  999 
CALL  PORQFIHASTIK) 

CALL  OUTSLH(HASTIH#lCALL> 
stop 

END 


YH8CLIC  PtfESfNCE  HAP  (P»2) 
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SUBROUTINE  FIRETMCM 
IMPLICIT  INTEGER  (A-ZI 
REAL  PNG 

C 

C  THIS  SUBROUTINE  COMPUTES  ANO  STORES  IN  AN  ARRAT 

C  THE  FIRETIMES  FOR  EACH  GUN  IN  A  BATTERY • 

C  If  A  BATTERY  will  FIRE  FOP  MOPE  THAN  ONE  MINUTE 

C  THIS  ROUTINE  STOKES  THAT  MISSION  FOR  THE  NEXT 

C  MINUTE*  ALONG  WITH  THE  FIRST  FIRING  TIME  IN 

C  THAT  MINUTE 

C  K.  1  -  ART  11  MISSION 

C  K  -  2  -  ENO  OF  MINUTE#  PROCESS  MISSIONS  FROM  LAST  MINUTE 

C  FOR  STCRE<J#K#L) 

C  J  -  1  -OLD  ARTIL  MISSION 

C  J  ■  2  -  NEW  APT  MISSION 

C 

COMMON  /  BIK 1 /M I  SHUN (60 I 

*  /  BLK4/NMISS 

*  /  BLKfe/RNG 

*  /  PU‘2/ESN0BS*NSNDBS 

*  /  BLKQ/MASTIM 

DIMENSION  STORE (2>60#3C0) 

C 

C  SET  PARAMETERS  ANO  CALL  RANGE  TO  COMPUTE  THE 

C  RANGE  FROM  THE  ARTILERY  AND  THE  SOUND  BASE. 

C  ******  ***  ******4**** 

C 

X-ESNDES 
Y-NSNDBS 
A»MISHUN ( 6  I 
R*MI SHUN ( 7 ) 

CALL  RANGE ( X# Y#  A#  8  I 
IF(R.EQ«2.)  GO  TO  25C 
C 

C  CALL  BATTFIPE  TO  GET  FIRING  TIME  FOP  EACH 

C  GIN  IN  A  BATTERY. SET  NMISS>1  FOP  NEW  MISSION 

C 

JJ  »  M I  SHUN  III 
1F(MISHUN(3).EQ.UI  JJ  ■  1 
DO  20C  J«  1»JJ 
NMISS-I 
CALI  BATTFR 

MI$HUN(94JI«  MISHUM9) 

2C0  CONTINUE 
C 

C  IF  MISSION  WILL  LAST  MOPE  THAN  1  MINUTE 

C  STORE  IT  ANO  INCREMENT  COUNTER  TO  TEH 

C  YOU  HOW  MANY  MISSIONS  HAVE  BEEN  STCREO 

C 

IF (MISHUNI * )  .€0,  II  GO  TO  23C 
Ml  SHUN ( 5  I  •  Ml  SHUN (51-  1 
NCNT-NCNT-H 
00  225  J  »  1 #  6C 
L  •  2 
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225  STORE (L» J»NCNT  )  •  NISHINM) 

23C  CONTINUE 
RETURN 

250  OCNT  •  ARTIL 

IF (OCNT  .EO.  C)  60  TO  425 

RECALL  MISSIONS  WHICH  BEGAN  FIRING  IN  THE 
LAST  NIN  AND  LASTEO  LONGER  THAN  1  MINUTE 

K  »  1 

DO  420  N» 1» OCNT 
DC  310  I  •  1*60 
MISHUNI I )  •  STORE (K» I#M) 

310  STORE (K» 1 »M )  •  0 

IF  (NISHUN(l)  .EG.  0  >  GO  TO  425 

COMPUTE  RANGE  ANO  CALL  BATTFIRE  FOR  FIRE  TINES 

A-HISHUMfcl 

B-MISHUNI7) 

CALL  RANGE  <X»Y*A,B> 

JJ  -  HI  SHUN  <1) 

IF ( NI SHUN ( 3 ) • EG •  01  JJ  •  1 
DO  320  J-1#JJ 

SET  NMISS*2  FOR  A  MISSION  WHICH  IS  CONTINUED 
FROM  LAST  MIN 

NMISS-2 

MISHUNOI.  MISHUN  (9+ J  ) 

CALL  BATTFR 

MISHUN  ( 9* J )  •  MISHUNC9) 

320  CONTINUE 

IF  FISSION  WILL  LAST  MCRE  THAN  1  MINUTE 

STORE  IT  ANO  KEEP  COUNT  HOW  MANY  YOU  HAVE  STORED 

IF  ( MISHUNC  5 1  .EG.  1)  GO  TO  410 
MI $HUN( 5 )  .  MI  SHUN! 51-1 
NCNT «NCNT  ♦  1 
L  -  2 

DO  400  J«l»  60 

400  STCPE ( L  #  J#  NCNT  I  •  MISHLNIJ) 

410  CONTINUE 
420  CONTINUE 
425  CONTINUE 

IF (  NCNT  « E 0*  0)  GO  TO  460 
L  •  2 

DO  450  !•  1#NCNT 
DO  450  J»  1  * 6C 
ST0RE<1*J»I>  •  ST0PE(2#J»I) 

STCPE(2fJ»I)  ■  0 
450  CONTINUE 
460  CONTINUE 

ARTIL  •  NCNT 

NCNT-0 

RETURN 


ooo  ooo  ooo  or>oor>oor>r>r>o 


SUBROUTINE  BATTFR 


C 

Q********************* ************************************  ************* 


THIS  SUBROUTINE  CONFUTES  THE  FIRING  TINES  FOR 
EACH  GUN  CR  T ANN  #  I T  CALLS  RATE  TO  COMPUTE 
RATE  OF  FIRE#  IT  CALLS  IMPACT  FOR  IMPACT  TIMES# 
ANO  IT  CALLS  ARRAY  TC  STORE  THE  SCUND  EVENTS. 
NMISS  «  1  MEANS  THIS  IS  A  NFW  MISSION 
NMISS  »  2  MEANS  THIS  MISSION  IS  CONTINUED  FROM 
A  PREVIOUS  MINUTE 


INTEGER 

COMMON 

* 

* 

* 


TYP#TIMLFT#FT#FTT#TIMEO 
/  &LK1/MISHUN<60) 

/  BLK4/NMISS 
/  BLK5/TYP# IAMP 
/  BLK6/RNG 


PlCM  ■  FRACTION  OF  ICM 


DATA  PICM/.333/ 

CALL  TYPE  (MlSHliN,  ITYPE»IFORC  E#  IRES) 
I F ( NM I S S  .£0.1)  GO  TC  500 


GET  LAST  FIRING  TIME  FOR  THIS  GUN 

ICNT  -  0 

FT  «  MI  SHUN ( 9 ) 

MAXTIM  ■  60 
GO  TO  fcOC 

SOO  CALL  PATE(FOF) 

TIMEO  ■ , 1 * F  0 F 
FT  -  TIMEO 

IF  < IT YPt  .EQ.  b)  T1MEG  •  1 
IFIITYPt  .EC.  12)  TIMED  «  1 
MAXTIM  -  fcG 

GO  TO  600 


GET  RATE  OF  FIRE  FOP  THIS  GUN 

ESC'  CALL  RATE(PCF) 

IF  C ITYP5  .EC.  12)  GU  TC  56C 
IFdTYPc  .NE.  8)  GO  TC  590 
56C  CONTINUE 

ICNT  ■  ICNT  ♦  1 

IF ( ICNT  .EQ.  17  .AND.  ITxPE  .Eu.  12)  GO  TO  570 
I F  C ICNT  .Nf  .  Al)  GO  TO  590 
57C  CONTINUE 
FT  -  tO 
TIMLFT  -  C 
GO  TO  ejo 

1 9C  FT  ■  TIMEO  ♦  RCF 
ICO  TIMLFT  ■  MAXTIM  -  FT 

IF (TIMLFT  .LE.  0)  GO  TC  800 
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CALCULATE  THE  TIME  FOR  THE  SOUND  TO 
REACH  THE  SOUND  BASE 

IRNG-(RNG/.33R) 

FTT  ■  FT*  IRNG 
TYP  •  ITYPE 

If ( F  TT  .EQ.  0)  FTT  ■  1 
KEY-1 

COMPUTE  WHAT  BANO  CF  AMPLITUDE  THIS 
SOUND  EVENT  IS  IN 

MISH  ■  ITYPE 

CALL  AMPL(MISH#RNG# IAMP) 

CONTINUE 

STORE  THIS  SOUND  fcVENT  IN  MASTER  APRAY 

CALL  ARRAY(FTT#TYP# IAMP) 

CONTINUE 

CALL  IMPACT  TO  DETERMINE  IMPACT  TIMES 

CALL  TGTARYCFTT) 

IFtRANF(Z)  .GT.  PICM  .AND. 

♦  ITYPE  .LE.  2)  GO  TO  750 
IF ( IT YPE  .EO.  3)  GO  TQ  750 
IF! ITYPE  .EO.  10)  GO  TO  750 
If ( ITYPE  .EO.  11)  60  70  750 
IF ( I  TYPE  .EQ.  13)  GO  TC  750 
IFITTYPE  .EO.  14)  GO  TO  750 
IF ( ITYPE  , EQ.  lfc)  GO  TO  750 
CALL  IMPACT(MISHUN,FT) 

750  CONTINUE 

TIMED  •  60-TIMLFT 
GC  TO  *50 

800  MIShUN(9)-FT-60 
RETURN 
END 


oooOf-><">r>oor»r>r>r>ooor>ooor><->ooo  o  <*>  o  r> 
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SUBROUTINE  ARR A Y ( SEC* T YP* I  AM P > 

IMPLICIT  INTEGER  (A-Z) 

COMMON  /BLK8/S01ND<24G»40#11) 

LEVEL  2#  SOUND 

THIS  SUBROUTINE  STORES  SOUND  EVENTS  IN  A 
3  DIMENSIONAL  ARRAY  ACCORDING  TO  THE  FOLLOWING 
ARR AY(S£C*TYP*AMP) 

INTEGER  SEC*  TYP 

SEC  ■  TIME  OF  SOUND  EVENT  < 1-240 ) 

TYP  •  TYPE  OF  WEAPON  OR  IMPACT  (1-18) 

AMP  «  RANGE  CF  AMPLITUDE  (1-111 


MUZZLE  IMPACT 

EVENT  EVENT 

TYP  «  1  -  155MM  HOWITZER - 21 

•  2-8  INCH - 22 

■  3  -  SIMM  MORTAR - 23 

«  4  -  4.2  INCH  MORTAR - 24 

■  5  -  1  ROMM  MORTAR - 2 5 

■  6  -  122MM  HOWITZER - 26 

«  7  152MM  G/H - 27 

-  8  122  MR L - 28 

-  9  130MM  GUN - 29 

-  10  T72-J25MM - 30 

«  11  SAGGER - 31 

■  12  240MM  MR L - 32 

«  13  M60A3  W/105MM  - 33 

■  14  TOW - 34 

■  15  175  MM  GUN - 35 

-  16  CAS  MISSION - 36 


SEC  ■  SEC  ♦  1 

SOUND(SEC*TYP»IAMP)«  SOUND ( S E C* T Y P* I  AMP  )  *1 

RETURN 

END 
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SUBROUTINE  IMP AC T ( Ml  SHUN, FT) 

IMPLICIT  INTEGER  <A-Z) 

RFAL  RNG 

THIS  SUBROUTINE  COMPUTES  THE  TIME  THE  IMPACT 
SOUND  WILL  REACH  THE  SOUND  BASE. 

DIMENSION  M I  SHUN ( 60 ) 
C0MM0N/BLK2/ESNDBS*NSNDR$/ 
1BLK4/NMISS/BLK5/TYP* IAMP/8LK6/RNG 

GET  RANGE  FROM  GUN  TO  TARGET 

X*M  I  SHUN ( 6 ) 

Y* M  I  SHUN (  7 ) 

A*M ISHUN ( 3 ) 

P-MISHUN<4) 

CALL  RANGE (  X*  Y*  A*  B  ) 

IF ( MI  SHUN ( 3  )  .EO.  0)  RNG  «  .5 

COMPUTE  FLIGHT  TIMES 

FIGHT  ■  4.  ♦  RNG 

COMPUTE  TARGET  RANGE  FPOM  THE  SOUND  BASE 

IF ( MI  SHUN  ( 3  )  .NE.  01  GC  TO  10G 
A  «  MISHUM6) 

B  «  MI  SHUN  <71 
100  CONTINUE 
X  •  t  SNOBS 
Y  •  NSNDBS 
CALL  RANGE  <  X *  Y*  A*  B  ) 

SbRNG  ■  RNG/.33E 

SET  KEY  FUR  COMPUTING  AMPLITUDE  OF  IMPACT 
FROM  THIS  GUN 

KEY  «  2 

CALL  TYPE <M ISHUN* I TYP E* 1 FOPC E * IR E S  ) 

TYP  •  ITYPE  ♦  20 
CALL  AMPL(TYP»RNG»IAMPI 
SE  ■  SBRNG  ♦  FLGT  ♦  FT 
IF  (SE  «GE.  240)  SE  ■  240 

STORE  THIS  SOUND  EVENT  IN  THE  MASTER  ARRAY 

CALL  AkRAY(SE*TYP*IAMP) 

NQO  CONTINUE 
RETUPN 
END 
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SUBROUTINE  RANGE (  X»  Y#  A»  B  ) 

INTEGER  A»6,X#Y 
CCMH0N/BLK6/RNG 

THIS  SUBROUTINE  CALCULATES  THE  RANGE  BETWEEN 
THE  TWO  COORDINATES  GIVEN  BY  XY  AND  AB 

C»((X-A)**2*<Y-B)**2) 

RNG  «  SORT (C ) /10« 

RETURN 


i; 
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SUBROUTINE  R ATE  <  ROF ) 

THIS  SUBROUTINE  COMPUTES  A  RATE  OF  FIRE 
FOP  INDIVIDUAL  SHOTS.  THE  SUSTAINED  RATES 
OF  FIRE  ARE  IN  ARRAY  RAOF 

COMMON /8LK1 /MISHUN<60)/BLK7/NC 
COMMON  /BLK9/MAST IN 

RAOfdl  I«1~155MM 
•2--8INCH 

■  3— 8IMMML1PTAR 

•  4 —  A. 2  INCH  HOP  TAP 
■5 — 120MM 

■6—  122MH 
■7 — 152MM  G/H 

■  B — MR  L 

•9 — 130MM  GUN 
■10-T72-125MM 
•11-SAGGER 

•  12-2 AC  NR L 
•13-M6GA3  W/105MM 
«14-TG» 

•15-175  MN  GIN 
•16-CAS  NISSION 

DIMENSION  PAQF<2>) 

DIMENSION  NBOM (2/10) 


DATA 

RAOF/ 

1.0# 

.5#  ft « # 

3.# 

3  •> 

1  •# 

1 .  # 

40.# 

1.# 

* 

o.c# 

16.#  C .  # 

0.0# 

0.5# 

C.#0 

.0#0 

.0*0. 

5#  C. 0/ 

DATA 

(N90MI1# J )# 

J»1#1C)/ 

* 

e» 

8# 

1#  0# 

0# 

c# 

c# 

G# 

0# 

0/ 

DATA 

(FBCM<2#J) 

# J«l#lt )/ 

* 

6  9 

2#  C# 

0# 

G# 

0# 

0# 

0# 

C/ 

CALL  TYPtIMISHUF#  HYPE,!  FORCE#  IRES) 
I  «  I  TYPE 

IF  (MISHUM3)  .EQ,  C)  GC  TO  200 

I F ( MI  SHUN ( 6 )  .EG.  k,)  GO  TO  300 
IF ( RAOF (  I )  .NE.  G.O)  GC  TO  100 
ROF  •  %0 
RETURN 

100  CONTINUE 

PTE  • ( l./RAOF ( I ) ) *tO • 

SIGMA*. 1*RTE 

CALL  NRAN31 (RANO# Z#NQ) 

RCF-RTE  ♦  KANO  *  SIGMA 
MIN  -.33  ♦  PTE 
IF (ROF  .LE.  MIN)  PDF  «  MIN 
IF ( I  ,  EQ.  8)  RCF  ■  1.5 
RETURN 

2C0  CONTINUE 

RTE  •  MI SHUN t 1 ) 

PTE  •  RTE/100.  ♦  .5 
ROF  •  U./PTE)  *  60. 

RETURN 

3G0  CONTINUE 
C 
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THIS  IS  A  CAS  MISSION  THE  RATE  bill  BE  THE  NUMBER 
OF  BOMBS  OROPFEO 

LOS  •  MISHUNU)  -  <  (M1SHUM  1 
NT  YPE  «  MISHUN(l) /ICO 
RTE  -  NBOMdFORCEfNTYPE)  *  LOS 
I P  < I FORC  E  .EQ.  I  .AND.  NT  TP  c •  .EC.  3»  RTE  «  RTE/30. 

RQF  •  (1. /RTE )  *  60. 

IMNTYPE  .EQ.  3  .ANC. 

IFOPCE  .EQ.  1  .AND. 

MI SHONi 5  )  .EQ.  1  .AND. 

MASTIM  .EQ.  M I  SHUN  (  2 )  )  K1SHUM5)  ■  30 
RETURN 


SUBROUTINE  AMP l  (MISH#RNG» IAM.P) 

C**************** ********************************* *************** ****** 

C 

C  IN  THIS  SUBROUTINE  THE  AMPLITUDE  CF  EACH  SOUND 

C  IS  CALCULATED  IN  DB  (REF  .000?  UB APS )  • 

C  THE  INITIAL  AMPLITUDE  IS  CALCULATED  USING  EQUIVALENT 

C  BARE  TNT  CHARGES  »  THESE  CHARGES  ARE  EQUIVALENT 

C  CQMPUT ATIGNALY  AT  THE  ONE  THIRD  POWER. 

C  ARRAY  TNT  CGNTAINS  THE  EQUIVALENT  CHARGES  FOR 

C  3  DIFFERENT  FIRING  CHARGES  FOR  EACH  RANGE  BEING 

C  FIRED.  THF  CHARGE  USED  FOR  EACH  SHOT  IS  DETERMINED 

C  BY  A  RANDOM  NUMBER  CRAW  FOR  THE  THREE  AVAILABLt 

C  FIRING  CHARGES.  CHARGES  IN  BOTH  TNT  ANC  HE  ARE  ALREADY 

C  TO  THE  ONE  THIRD  POWER 

C  IF  THIS  EVENT  IS  AN  IMPACT  THEN  THE  EQUIVALENT 

C  CHARGE  IS  OBTAINED  FROM  ARRAY  HE 

C 

f  AFTER  CALCULATING  THE  AMPLITUDE  OF  THE  SOUND  EVENT 

C  IT  IS  PLACED  IN  AN  AMPLITUDE  BIN  AS  FOLLOWS. 

C 


c 

AMPL  AM PL 

C 

IN 

c 

DB  BIN 

c 

>  110  1 

c 

105-11C  2 

c 

100-105  3 

c 

95-1CC  4 

c 

92-95  5 

c 

69-92  6 

c 

87-89  7 

c 

34-97  8 

c 

80-94  9 

c 

70-BC  10 

c 

<  70  11 

c 

c 

A*  AMPL  IN  06 AR  S 

c 

RNG«  RANGE  IN  KM 

c 

I-  TYPE 

OF  GUN 

c 

TNT ( I j  J#  K  ) 

1 

■ 

155MM 

c 

I  ■  TYPE  OF  GUN  (l-20> 

2 

■ 

6  INCH 

c 

J  ■  RANGE  (] -30 J 

3 

■ 

PIMM  MCRTAR 

c 

K  ■  FIRING  CHARGE  (1-3) 

4 

m 

4.2  INCH  MORTAR 

c 

5 

m 

120MM 

c 

HE(II 

6 

m 

122MM 

c 

I»  TYPE  OF  GUN  WHICH 

7 

m 

152MM  G/H 

c 

FIRED  THIS  ROUND 

B 

• 

MRL 

c 

9 

w 

130MM  GUN 

c 

1C 

• 

T72  -  125MM 

c 

11 

m 

SAGGER 

c 

12 

m 

240  MRL 

c 

13 

9 

M60A3  W/105MM 

c 

14 

9 

TOW 

c 

15 

9 

175MM  GUN 

c 

lfc 

9 

REDEYE 

C 

C 

C*****************************  **********  **************  *41*#**  *********** 


DIMENSION  TNT ( 20*  30# 3  )# 

*  HE ( 40 ) 

*  #C ASBM( 2#  10  I 
COMMON  /BLK 1/MI SHUN ( 60) 

COMMON  /BLK7/N0 

DATA  (TNT(1#K#1)#K»1#3C)/ 

*  1.46#  1.46#  1.59#  1.9C#  2. 13#  25*2.36/ 

DATA  <TNTn#K#2)#K-l*3C)/ 

*  3*1.46#  1.59#  1.90#  7*2.13#  18*2.36/ 

DATA  (TNT(1#K#3)#K>1#3C)/ 

*  4*1.46#  1.59#  4*  1.90#  3*2.13#  ie*2.36/ 

DATA  (TNT(2#K#1)#K>1#30)/ 

*  1.63#  1.67#  2.34 #  2.50#  2.81#  2.81#  24*3.04/ 

DATA  CTNT(2#K#2)#K«1#3C>/ 

*  1.63#  1.63#  2.34#  2.34#  2.50#  2.50#  8*2.81*16*3.04/ 

OATA  (TNT(2#K#3)#K»1#3C)/ 

*  1.63*  1.63#  1.87*  1.87*  2*2.34#  5*2.50#  3*2.81#  16*3.04/ 

OATA  ITNT(3#K#1),K«1#30>/ 

*  .555#  29*. 617/ 

OATA  (TNT(3*K#2)*K«1#3C>/ 

*  .524#  3*. 555#  26*. 617/ 

DATA  (TNT(3#K#3)#K-1*3C)/ 

*  .524#  3*. 555#  26*. 617/ 

DATA  I  TNT  ( 4#K# 1 ) # K • 1#  30 ) / 

*  .745#  .763#  .763#  .839#  26*. 927/ 

DATA  (TNT(4#K#2I#K-1#3C)/ 

*  .745*  .745#  .763#  .839#  .921#  25*. 927/ 

OATA  <TNT(4#K«3)*M1#30)/ 

*  3*. 745#  .839#  .921#  25*. 927/ 

DATA  (TNT(5#K*1)#K>1#3C>/ 

*  .355#. 427*. 479#. 530#  26*. 618/ 

DATA  (TNT(5#K*2)*K-1*3GI/ 

*  .427#. 479#. 530# .575#  26*. 618/ 

DATA  (TNT(5#K#3)#K«1*30) / 

*  .479#. 530#. 575#  27*. 616/ 

DATA  (TNT(6#K#1)#K>1#3CI/ 

*  2*. 536# 1.37# 1,67# 2. 02 #2*2. 34# 23*2. 82/ 

DATA  (TNT(6#K#2!#K»1#30)/ 

*  3*.536#1.37»1. 67*2*2. 02*5*2.34,  16*2.82/ 

OATA  (TNT(6#K*3)#K>1#30)/ 

*  4*. 538 #1.37#  2*1.67#  4*2.02#  2.34#  18*2.82/ 

OATA  ITNT<7*K*1)*K-1#3C)/ 

*  2*1.46#  1.68#  1.90#  2.28*  2.50#  2.56*  23*2.63/ 

DATA  (TNT(7#K#2)#K>1#30)/ 

*  3*1.48#  1.68#  1.90#  2.28#  2.50#  8*2.56,15*2.63/ 

OATA  <TNT(7#K#3)*K-1#3C>/ 

*  4*1.46*  1,68#  1.90#  2.28#  8*2.50#  2.56#  14*2.63/ 

DATA  (TNTt8#K#l)#K>l#30)/ 

*  30*1.37/ 

DATA  (TNT(6#K#2)#K>1#3CW 

*  30*1.37/ 

OATA  (TNT(8#K#3)#K>1*30)/ 

*  30*1.37/ 

DATA  <TNTt9#K#l)#K«l*30)/ 

*  7*. 298#  6*2.75,17*3.08/ 

DATA  <TNT<9#K#2I»M1#30)/ 
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*  7*. 298*  2*. 353#  <**.<.15#  9*2.75#  6*3.08/ 
DATA  <TNT<9#K#3I#K»1#3GI/ 

*  9*. 298#  4*. 353#  6*.<*15#  3*2.75#  6*3.08/ 
DATA  (TNT(10#K#1)#K"1#30)/ 

*  30*2.50/ 

DATA  (TNT(10#K#2)#K»1#30)/ 

*  30*2.50/ 

DATA  <  T  N  T  < 10#K#  3 ) #K ■ 1 #  30)/ 

*  30*2.50/ 

DATA  <TNT(11#K#1)»K«1#30)/ 

1  30*1.826/ 

DATA  (TNT(11#K#2)#K*1#30)/ 

1  30*1.825/ 

DATA  (TNT(11#K#3)#K-1#30)/ 

1  30*1.825/ 

DATA  <TNT<12#K#1)#K-1#30>/ 

*  30*1.56/ 

DATA  CTNT(12#K#2»#K-1#30I/ 

*  30*1.56/ 

DATA  <TM(12#K#3)#K«1#  30)/ 

*  30*1.56/ 

DATA  (TNT(13#K,1)#K»1«30)/ 

*  30*2.29/ 

CATA  (TNT(13#K#2)#K«1#2G)/ 

*  30*2.29/ 

DATA  <TNT(13»K#2)#K«1#30)/ 

*  30*2.29/ 

DATA  <TNT(1A#K#1)#K»1#20>/ 

1  30*1.625/ 

DATA  CTNT<1*»*K#2I#K-1#30I/ 

1  30*1.625/ 

DATA  <TNT<14,K#3)#K«1#30)/ 

1  30*1.825/ 


DATA 

<TNT(15»K#1)#K»1#30)/ 

* 

12*2.90#  6*3.43# 

12*3.95 

/ 

DATA 

(TNT (15#K#2)#K»I#  30 )/ 

* 

18*3.43#  12*3.95/ 

DATA 

<TNT( 15#K#  3) »K-1» 

30)/ 

* 

30*3.95/ 

DATA 

(HE  <I)#I«1#20I/ 

* 

2.605#  3.311# 

1.341# 

1.983# 

1.726# 

* 

2.C69#  1.934# 

2.089# 

2.ce9# 

C.O# 

* 

0.3#  2.089# 

C  .0# 

0.0# 

3.286# 

+ 

G.O#  0.0# 

c.o# 

o.c# 

C.O/ 

DATA  (CASBM1#  J  »#  J»l#  1C  )  / 

*  <* .  5 <* #  A .  10 #  3 . 5 0 #  0.0#  0.0#  J.C#  0.0#  0.0#  0.0#  0.0/ 

DATA  (CASBM(2»J1#  J-l » 10  * / 

*  4.54#4.1G# 5.76#  0.0#  0.0#  0.C #  0.0#  0.0#  0.0#  0.0/ 
IFCKISH  .GT.20)  GO  TO  5  DC 

SELECT  THE  CHARGE  TC  BE  LStD  FOR  THIS  SHOT 

8  •  RANMZ) 

K  «  2 

IF (  B  .IE.  .331  K  «1 
IK  P  .GE.  .67)  K  -3 
J  »  PNG  *  .5 
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IF  (  J  .IE.  1)  J  -  1 
IF  (  J  .GE.  30  J  «  30 
I  -  FISH 

BANG  •  TNT(I»J»K) 

GG  TO  600 

IF  THIS  IS  AN  INFACT  EVENT  GET  THE  EXPLOSIVE 
CHARGE  WEIGHT. 

500  INOEX  «  A"  I  S H  -20 

CALL  TYPE  ( F'  I  SHUN*  ITYFF.,IFOPCE»IPES) 

IF (  ITYPE  • Nr •  1 6  >  GO  TO  550 
IOPD  ■  M I S  HL  N (  5  >  / 1 0 0 
BANG  «  CASBMI If ORCE.ICRC) 

GO  TO  6CC 
550  CONTINUE 

RANG  •  HE(INCEX) 

600  CONTINUE 

CALCULATE  THE  AFPLITUDe  Of  THE  SOUND  IN  P S I 

P  «  PNG  *  3260. 

IF (F  .NE .  C. )  GO  TC  ?Gu 
WPITE  (6#9Gt  )  FISHING#  1AFP 
90C  FCPHATf  IX.  M»f  1C.4»I4»// ) 

700  CONTINUE 

PSI  ■  210.  +< (BANG/F  )  +  *  1 . 4  0  7  I 

NCV  CONVERT  TC  UBAPS  AND  THEN  TP  OP 

PUeAP  ■  PSI  *  1C0CG0C.  /  14.5 
C 

CP  •  20.  *  ALCG1C ( PUEAP  /.OGOZ) 

DB  *  DB-  10 

CALL  NRAN31(RANC»Z.NC) 

OP  »  DP  +(  6 . C  *  PANC) 

C  SELECT  THE  FANGE  BIN  t-CR  THIS  AMPLITUDE 

IDB  ■  OB 

IFUTYPE  .GE.  5  .OP. 

♦  ITYPE. LE. 9)  CALL  AVG ( IDB. IC ALL > 


IF 

(DP 

.GE. 

11G.  ) 

IAFP 

■ 

l 

IF 

(OB 

,  L  T  • 

110.1 

IAFP 

a 

2 

IF 

( D  B 

.IT. 

105.  ) 

I  AFP 

a 

3 

IF 

( C  B 

.IT. 

ICO.  ) 

I  AFP 

a 

4 

IF 

(OB 

.LT. 

95  .  ) 

I  AFP 

a 

*- 

* 

IF 

(DB 

.LT. 

92.  > 

1  AFP 

a 

t 

IF 

(OB 

.LT. 

09.  ) 

I  AFP 

a 

7 

IF 

(OB 

.LT, 

H  7  .  ) 

I  AFP 

a 

P 

IF 

(PB 

.LT. 

64.  ) 

I  AFP 

a 

9 

IF 

(OP 

.LT. 

80.  ) 

I  A  FP 

■ 

10 

IF  (OB 
RETURN 
END 

.LT. 

70.  ) 

I A  F  P 

a 

11 
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SUBROUTINE  AVGUAMP,  ICALL) 

IF  ( IC ALL  .EO.  <599)  GO  TO  500 
ITOT  ■  ITOT  ♦  I  AN P 
IC  NT  -  ICNT  ♦  1 
RETURN 

500  CONTINUE 

IAVG  •  ITOT / ICNT 
WR ITE ( 6#  90C  I  IAVG 

900  FORMAT (lHl, ///////// /20X*112# 1H1 ) 
RETURN 


oooo  oor>ooooor>ooooooor>ooor>r>or^r>ooooo 


SUBROUTINE  PRINT  (  HAS T If*  > 

C 

C***************» ****************************************************** 

SOUND(SEC,TYP,AMP) 

SEC  •  TIME  OF  SOUND  EVENT  (1-240) 

TYP  •  TYPE  OF  WEAPON  OR  IMPACT  (1-40) 

AMP  ■  RANGE  OF  AMPLITUDE  (1-11) 


MUZZLE  IMPACT 

EVENT  EVENT 

TYP  «  1  -  155MM  HOWITZER - 21 

•  2  -  8  INCH - 22 

•  3  -  PIMM  MORTAR - 23 

■  4  -  4.2  INCH  MORTAR - 24 

•  •>  -  120MM  MORTAR - 25 

•  6  -  122MM  HOWITZER - 26 

•  7  152MM  G/H - 27 

■  8  122  MR  L - 26 

»  9  130MM  GUN - 29 

-  10  T72-125MM - 30 

•  11  SAGGER - 31 

■  12  240MM  MRL - 32 

■  13  M60A3  W/1C5MM  - 33 

•  14  TOW - 34 

■  15  175  MM  GUN - 35 

•  16  CAS  MISSION - 36 


IMPLICIT  INTEGER  ( A-Z  ) 

COMMON / 31 K8 / S0UNC(240»40»11) 
COMMON  /  BLK11/10APAY<?*0,300) 
LEVEL  2, IOARAY 
LEVEL  2, SQUNO 
DIMENSION  BLANK ( 100  ) 

INTEGER  AMP ( 2# 12 ) 


DATA  BLANK / *  *, 

'  1', 

•  2  • , 

•  3' 

,•  4* 

,*  5*, 

*  6','  7* 

1*11'#' 12* 

,  •  13  ' » 

*  14  * , 

'15*, 

•  16» 

,'17' 

,'ie». 

•19*, *20* 

♦ ' 21 ', ' 22 ' 

,  •  23 •  » 

*24*, 

•26', 

•26* 

,  ' 27 • 

,'26', 

'29*, *30* 

* ' 31 • 32 ' 

, *33', 

•  34  • » 

•35*, 

•  36 » 

,'37' 

, '38', 

*39', *40' 

♦  •41**  *42* 

#•43*# 

•44*, 

•46*, 

•46* 

,  '47' 

,  '48  ', 

•49', *50* 

♦'51', *52* 

*  *  63*  # 

•54*, 

'55*, 

•  66  • 

,'57» 

, »  56  • , 

*59', *60* 

*  *61 ',  *62* 

, *63«, 

•64  *, 

•65', 

*66' 

,  '  67  • 

, '68*, 

*69', *70' 

♦ *71**  *72* 

,'73*, 

•74*, 

'76*, 

•76' 

,  »77» 

, '78*, 

•79', *80' 

*»81*,»«2* 

, *e3». 

*  P  4  *  , 

•  8  6  •  , 

*  86  • 

,'87* 

»  '  8  8  • , 

•89', *90* 

**91***92* 

, *93', 

•94*, 

•95', 

•96  * 

,'97* 

, '98', 

'99'/ 

THIS  SUBROUTINE  WILL  PRINT  OUT  THE  SOUNO 
EVENTS  ANO  UPDATE  THE  ARRAY 

AMP(12)»0 

WR ITE I  6,910  )  MASTIM 
75  CONTINUE 


r>  o  o  non 


DO  200  N«l,t0 
DC  400  J-1,11 
0C  400  K  »  1»40 

AMP ( 1, J  )  ■  AMP ( 1 ,  J  )  ♦  SOUND ( N»K»  J  ) 

IF (  K  .  LT.  5)  GO  TO  340 
IFt  K  .GT.  4  )  GO  TO  340 
AMP ( 2#  J )  ■  AMP ( 2/ J  )  ♦  SGUNO( N»K»  J  ) 

390  CONTINUE 
400  CONTINUE 

DC  500  J-1,10 

5C0  AMP  ( 1,12 )  •  AMP ( 1 » 1 2  I  ♦  AMP(1,J> 

WP ITE {  fc  »  900  )  N» BLANK <AMP< 1,12  » ♦ 1 1 » ( ( B L ANK ( AMP ( 1 , J » ♦ 1 ) ,  I » It  2  )  > 
*J«1»11> 
tC2  CONTINUE 

ZERO  FILL  ARRAY  AMP 

00  510  M  •  1*2 
00  510  J  •  1*12 
510  AMP(M»J)  «  C 

200  CONTINUE 

900  FORMAT ( 2X, 12#6X,A?.»  7  X, 11 ( A2,  '  /  • »  A  2, 3  X  )  ) 

MOVE  ALL  THE  SOUND  EVENTS  DOWN  ONE  MIMTE  IN  ARRAY,  SOUND 

DO  1000  N  •  l,  16C 
no  1000  K  -  1,40 
OC  1C0C  J«l,ll 
NN-  N+feO 

SCUND(N,K,J)  «  sound<nn,k,o) 

1000  CONTINUE 

DO  1500  N  -  181,240 
00  1501.  K  •  1 , 4 C 
DO  1500  J  -  1,11 
SGUNO ( N, K , J  )  ■  C 
1500  CONTINUE 

Dr  2000  N  •  1,180 

NN  «  N  ♦  fcf 

DO  2GCC  K  •  1, 3C0 
ICAPAY(N,K)  «  ICARAY(NN,K) 

2000  CONTINUE 

DO  3000  I  «  61,240 
DU  3000  J  •  1, 3CC 
IOARAY(l,J>  -  C 
3000  CONTINUE 
RETURN 

910  FORMAK  1H1,  8X,  »M1N  ■  *,I5, 

*  2GX , • A  MPL1TU0E  IN  DR*,/ 

*lK,*SEC*,ex,‘TCT',  6X,«>  110  105-110  100-105  95-100  92-95  69 

*92  87-69  e4-47  8C-84  70-6C  <  70S/I 

END 


C3S 
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AD-A112  36S 
UNCLASSIFIED 


ARMY  MATERIEL  SYSTEMS  ANALYSIS  ACTIVITY  ABERDEEN  PROV— ETC  F/S  17/1 
SOUNO  R ANSI NS  EFFECTIVENESS  MOO EL  (SREM),(U) 

DEC  81  V  J  HUSHES'  H  C  DUBIN 

AMSAA-TR-333  ML 


ooooooooooo 


SUBROUTINE  RDRCF  ( MASTI M ) 

IMPLICIT  INTEGER  CA-Z) 

REAL  ROF, CUMROF ( 100 ),NUMRED(1G0) 

COMMON  /BLK8/SOUNO<290#90,11) 

LEVEL  Zt SOUND 

********************************************************************** 


THIS  SUBROUTINE  EXTRACTS  FROM  ARRAY  SOUND  THE 
CUMULATIVE  RATE  OF  FIRE  (  THE  INDEX  FOR  CUMROFCI)). 

IT  THEN  STORES  IN  THAT  LOCATION  THE  RED  RATE  OF  FIRE. 

TOT  ■  CUMULATIVE  RATE  OF  FIRE  ♦  IMPACTS 
RED  »  CUMULATIVE  RATE  OF  RED  MUZZLE  EVENTS 

********************************************************************** 

IF  (MASTIM  .EC.  999)  GO  TO  70C 
TOT  *0 

DO  500  N»l,fcO 
DO  900  J»1,U 
DO  900  K  ■  1,40 
TOT«TilT*SOUND(N,K,  J) 

IF  C K  .GT.  9)  GO  TO  300 
IF (K  .LT.  5)  GO  TO  300 
REC*RtD*SOUND(N,K,J) 

300  CONTINUE 
900  CONTINUE 

IF ( TOT  .GE.  99)  TOT  •  99 
CUMROFI TOT  +  1 )  ■  CUMR OF ( TOT+1 )  4  RED 
NUMRE D( T 0T+ 1 )  «  NUMR ED ( TOT* 1 ) 4 1 
RED  •  C 
TOT  ■  0 
500  CONTINUE 
RETURN 

7CC  CONTINUE 

WRITE (6,900 ) 

CO  «30  I  «  1,100 

IF ( NUMRE D ( I )  .NE.  0.)  GO  TO  750 

PDF  «  0. 

GC  TO  760 
750  CONTINUE 

ROF  •  CUMROFID/NUMREDU ) 

760  CONTINUE 
II  -1-1 

WRITE  (6*910)  II,FPF 
800  CONTINUE 

900  F0RMAT(1H1,10X, •T0T'#7X, •RED* »/9X* EVENTS  MUZZLES*//) 

910  FORMAT  ( 10X , 1 2, 7X, F 6 . 2 ) 

RETURN 

ENO 
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SUBROUTINE  EVENTS  < ROF 5, MAS  TIM#  ICALL#ROF> 

IMPLICIT  INTEGER  <A-Z) 

REAL  PRCNT 

COMMON  /BLK6/S0UND(240#40#11)  • 

LEVEL  2#  SOUND 
DIMENSION  SEC ( 300 ) 

SEC ( I )  I  ■  1-100 

STOREO  IS  THE  NUMBER  Of  SECS  DURING  WHICH 
THE  EVENTS  PER  SECOND  «  I 
IF (MASTIM  • EC •  959)  GO  TO  700 
ICNT  ■  ICNT  ♦  1 
TOT  «  (PQF5  *  .21  /  ROF 
SECCTGT+1)  -  SECITOT  ♦  1)  ♦  1 
RETURN 

700  CONTINUE 

WRITE!  6#  905 ) 

905  FORMAT ( 1H 1 ) 

WR I TE ( 6#  910 ) 

ICALL  •  1CALL  -  1C 
DO  SCO  I  «  1#10C 

PRCNT  -  (SECmnCO.  IMICNT  *  1.01 
II  ■  I*ROF 
JJ  -  (I*ROF)-ROF 
WRITE  (6»9C0)  J  J#  1 1 #  PRC  NT 

800  CONTINUE 

900  FORMAT  ( lfcX# 16# > 16# 1GX# F6 .4/ » 

910  FORMAT  ( 40X  # •PRCNT*, /21X#,R0F*» 18X# •0F*#/40X# •GAME*#/  /  ) 
RETURN 
END 
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SUBROUTINE  OUTSUIMHASTIH# ICAll) 


IMPLICIT  INTEGER  (A-Z) 

COMMON  /  BLK 8 /SOUND (2 AO#  AO# 11) 
COMMON  /BLK12/CT#SY$#ROF 

LEVEL  2# SOUND 

REAL  PRCNT 

#  ROF1 

#  LINTOT 

#  FACTOR 

»JACK(80) 

# RQF3( 80) 

# 0UTSM2 ( 20 ) 

»0UTSM1( 80#  20 ) 

DIMENSION  AL  PH ( 20 ) 

#FMT1(5I 

#FKT2(7) 

* SUM1( 6) 

#RQF5F (300) 

# RUNTOT ( 500 ) 

#R0M5( 300) 

#DIST(6#  3# 11) 


DATA 

FMT1 

/•IX# IA#  * 

# • 1H-# I  A# • 

#•  • 

#*F6.2#  * 

# • F8 • 2 )  • 

/ 

OATA 

FMT2 

/ • 2X# AHTROF • 

# • #  8X#  • 

#•  • 

# • A6#AHLCST# • 

»«2X#  • 

# ' 3HT0T  • 

#•//)  • 

/ 

DATA 

DAI  H 

/  *  fcH  - #•/ 

DATA 

BLANK 

/•  •/ 

DATA 

NMBR 

/•Ffc.2#  '/ 

DATA 

NMBR2 

/  •  F 8 # 2#  •/ 

OATA 

ALPH 

/•1*#'2»#»3»#»A»#'5»# 

•6*>«7*>*8»#*9*#»10»# 

•U*#«1Z*#»13*#*1A«#»15»# 

•16»#«17»#»18»#*19«#»20» 

/ 

DATA 

AL  PHI 

/•O*/ 
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********************************************************************** 

THIS  SUBROUTINE  CALCULATES  THE  RATE  Of  FIRE  OVER  A  FIVE  MINUTE 
PERIOD  ( ROf 5 )  ANO  THEN  CONSIDERS  ALL  SOUND  EVENTS  IN  THE 
NEXT  SIX  SECONO  PERIOD 
CT  ■  CRITICAL  THRESHOLD 

THIS  IS  THE  NUMBER  OF  EVENTS  THAT  MAY  OCCUR  IN  A  SIX  SECOND 
WINDOW  AND  STILL  BE  DISTINGUISHABLE 

SUMl(I)  I-l#6  •  NO.  OF  MUZZLE  EVENTS  PER  SEC C I > 

IN  THE  SIX  SECOND  WINDOW 

POM5 ( I )  1*1#  300  TOTAL  MUZZLE  EVENTS  IN  SEC  I  OF  5  MIN  WINDOW 

P0F5F ( I )  1-1,300  TOTAL  NO.  OF  SOUND  EVENTS  IN  SECOND  I  OF 

THE  5  MIN  WINDOW 

R0F5  *  TOTAL  NO.  CF  SOUND  EVENTS  IN  5  MIN  WINDOW 

PPM  »  TOTAL  NO.  OF  NUZZLE  EVENTS  IN  5  MIN  WINDOW 

IRPF  »  COUNTER  FOR  SECOND  OF  5  MIN  WINDOW 

IP  1ST  -  COUNTER  FOR  SECOND  DF  6  SEC  WINDOW 

THRESH  -  TOTAL  NO.  OF  SOUND  EVENTS  IN  6  SEC  WINDOW 

REOSUM  ■  TOTAL  RED  MUZZLES  IN  6  SEC  WINDOW 

MUZSUM  «  TOTAL  MUZZLE  EVENTS  IN  t  StC  WINDOW 

RGF8IN  •  PATE  OF  FIRE  BIN  BASED  CN 

1  RATE  OF  FIRE  FOR  5  MIN 

2  RATE  CF  FIRE  FOR  fc  SEC 

P0F3(I»  •  NO.  CF  TIMES  RATE  CF  FIRE  •  (I  *  ROF> 

RINTCT(I)  I  - 1 #  500  TOT  NO.  CF  PETECTABLE  RED  MUZZLE  EVENTS 
FOP  MIN  I  CF  GAME 

REDSUM  •  NUMBER  OF  RED  MUZZLE  EVENTS 
CUTSM1 ( I , J,K ) 

I  •  1#8G  RATE  CF  FIRE  BINS  IN  INCREMENTS  OF  ROF 
ROF  •  INCREMENTS  FOR  I 
J  •  NUMBER  OF  RED  MUZZLE  EVENTS 

STORED  IS  THE  NUMBER  OF  TIMES  CONDITIONS  I#J  ARE  MET. 

DI$T(I#4#K)  THIS  IS  ThE  SIX  SECOND  WINDOW  UNDER  CONSIDERATION 
I  «  1#  6  SECONO 

J  •  1#2  1  •  ALL  SOUND  EVENTS 

2  •  RED  MUZZLE  EVENTS 
K  •  1,11  AMPLITUDE  BINS 

ft*****************************  ******************  ***♦<•****♦♦  ********** 

THE  FOLLOWING  ARE  INPLTS  FOR  THIS  SUBROUTINE 
RCF  ■  INCREMENT  FDR  CLTSM1 
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CT  •  CRITICAL  THRESHOLD  (WAX  •  16) 
ISYS  ■  TYPE  OF  SYSTEM  REPORTING 

1  -  AUTOMATED 

2  -  MANUAL 


**************************************************** **** ********  ****** 


IF  THIS  IS  THE  END  OF  INPUT  GO  TC  PRINTOUT 

IF ( MASTI M  .£Q.  999)  GO  TO  500 
IFCICALL  .GT.  5)  GO  TO  190 

UP  TO  STATEMENT  190  IS  ONLY  TC  INITIATE  THE  FIRST  FIVE  MINUTES 
DURING  WHICH  WE  WILL  CONSIDER  THE  RATE  OF  FIRE 
********************************************************************** 

50  CONTINUE 

ICNT  ■  ICNT  ♦  1 
DO  120  1  «  1,60 
DO  110  J  •  1,90 
DO  ICO  K  -  1,11 

II  ■  6C  *( ICALL-1 )♦  I 

RCF  5F  { 1 1 1  >  RCF5FUI)  *  SOUND ( I, J, K ) 

I F ( J  .GE.  2D  GO  TC  90 

P0M5  (II)  -  R0M5UI)  ♦  SOUND  ( I, J,K  ) 

90  CONTINUE 

100  CONTINUE 

11C  CONTINUE 

120  CONTINUE 

IMICALL  .NE.  5)  GU  TO  IPO 
DO  16C  I  «  1,6 
DO  150  K  *1,11 
00  140  J  ■  1,40 

DIST ( I, 1,K  )  >  DIST  (I, 1,K  )  *  SOUND (( 54  +  1) , J,K ) 

I F  ( J  .LT.  5  .OR. 

*  J  .  GT  .  9  .  AND . 

*  J  .he.  12)  GO  TO  130 

DIST(I,2,K)  ■  DISTC I,2,K )  ♦  SOUND! (54+1), J,K) 

130  CONTINUE 

140  CONTINUE 

150  CONTINUE 

16C  CONTINUE 

C 

IROF  •  1 
IOIST  •  1 
ROF  5  •  C 

ROM  ■  C 

DO  17C  I  •  1,300 

PGM  •  POM  ♦  ROMM  I ) 

ROF 5  «  ROF 5  *  R0F5F(I) 


170 

CONTINUE 

180 

CONTINUE 

RETURN 

190 

CONTINUE 

105 


oooo  oooooooooo 


44*  ************ *****44*4*44  *************************************  ****** 

THE  5  MINUTE  INITIALIZATION  IS  OVER  CONTINUE. 

********************************************************************** 


SUBTRACT  THE  RATE  Cf  EVENTS  FOR  THE  LAST  SECOND 
FROM  R0F5  AND  SUBTRACT  THE  PATE  OF  FIRE  FROM 
RQH  FOR  THE  LAST  SECOND 


DO  3*0  TIM  ■  1,60 

OLDROF  •  R0F5/R0F 

R0F5  «  ROF5  -  R0F5F ( IPOF  ) 

TEMROF  ■  C 
TEHROH  •  0 

ROM  «  ROM  -  RCM5UR0F) 

REMOVE  THE  OlLEST  SECCNC  FRCM  DIST(I,J,K>  AND 
REPLACE  IT  WITH  THE  NEXT  SECOND  FRCM  SOUND(I,J»K) 


?0Z 

210 


C 

C 


c 

c 


230 

c 

c 


c 

c 


c 

c 


* 

* 


* 

c 

c 


240 

2‘C 

260 


DO  210  I  •  1,11 
DO  2C0  J  •  1,3 

CI$T(IDIST,J»I)  •  0 
CONTINUE 
CONTINUE 
SUMl(IDIST)  •  0 
DC  2 70  K  •  1,11 
DO  260  J  «  1,40 

TOTAL  EVENTS  FOR  1  SEC 

TEMROF  •  TEMROF  ♦  SOUND! T IM, J, K ) 

IF ( J  .GE.  21)  GO  TO  230 

TOTAL  MUZ  EVENTS  FOR  1  SEC 
TEMRCM  •  TEMROM  ♦  SOUND (T IM, J,K  ) 

CONTINUE 

TOTAL  EVENTS  /  SEC  /  AMP 

C I  ST (ID  1ST, 1, K )  •  DIST(  IDIST, 1,K  )  ♦  SOUND! T IM, J, K> 
I F  C  J  .Gf.21)  GC  TO  250 


TOT  MUZ 

EVENTS 

/ 

SEC 

SUM 

1CI0IST) 

■  SUNK 

10 

1ST) 

I 

F ( J  .IT. 

£  .OR. 

J 

.GT.  <) 

.  AND  . 

4 

.NE.  12 

)  GO  TO 

240 

RED  MUZ 

EVENTS 

/ 

SEC  / 

oistut 

I ST, 2 ,K  ) 

a 

DIST 

♦  SOUND 

(TIM, J,K 

) 

RED  MUZ 

EVENTS 

/ 

SEC  / 

DISTUO 

I  ST, 3 , K  ) 

a 

DIST  ( 

♦  SOUND 

(TIM, J,K 

» 

CONTINUE 

CONTINUE 

CONTINUE 


♦  SOUND ( T IM, J, K I 


AMP 

(IDIST, It K) 


AMP 

IDIST, 3, K) 


oor>  oooo  o  o  o  r>  o  o  o  o  o  o 


270 


CONTINUE 


R0F5  ■  TOTAL  EVENTS  CVER  5  WIN  PERI00 

ROM  •  TOTAL  MUZZLE  EVENTS  OVER  5  HIN  PERI00 

ADD  THE  RATE  OF  FIRE  FOR  THE  NEWEST  SECOND 

ROF 5  •  R0F5  ♦  TEMPOF 
PCF5F (  IROf )  ■  TEMRCF 
ROM  ■  ROM  ♦  TEMROM 
R0M5( IROF )  •  TEMROK 
IROF  «  IROF  ♦  I 

IF  THIS  IS  THE  END  OF  A  5  MIN  PERIOD.  SUBROUTINE 
EVENTS  WILL  RECIEVE  THE  PRESENT  5MIN  TOTAL  EVENTS 

IF ( I P Of  .NE.  3001  60  TO  2B0 

CALL  EVENTS  ( ROM# MAST IM# IC ALL# ROF  ) 

IROF  ■  1 

2*0  CONTINUE 

NEWRCF  «  ROF 5 /ROF 

IF  THE  PATE  OF  SOUND  EVENTS  HAS  CHANGED  CONSIDER 
ALL  TARGETS  IN  THE  SIX  SECOND  WINDOW 

I F  <  GL  CPOF  .EO.  NEWROF)  GO  TC  310 
DO  300  I  *1# 11 
DO  29C  J  »  1#  6 

D I  ST ( J, 3#  I )  >  D  1  ST ( J, 2#  I ) 

290  CONTINUE 

300  CONTINUE 

310  CONTINUE 

IOIST  ■  10IST  ♦  1 

IFIIOIST  .01.  6)  1C  1ST  •  1 
RECSUM  •  0 
JAKSM  »  C 
THRESH  -  0 

ACC  LP  ALL  SOUND  EVENTS  IN  6  SEC  WINOOW 

00  330  SEC  ■  1 » 6 
CO  32C  AMP  •  1#1C 

THRESH  »  THRESH  ♦  DIST ( SEC# 1# AMP  I 
320  CONTINUE 

330  CONTINUE 

IF  THE  THRESHOLD  HAS  NOT  BEEN  EXCEEDEO  ADD  UP  ALL 
THE  RED  MUZZLE  EVENTS  IN  THAT  WINDOW 
REDSUM  ■  CT  ♦  1 

IFITHSESH  . GT .  CT)  GO  TO  360 
RfcOSLM  •  C 
DO  35C  SEC  •  1#  6 
DO  3*0  AMP  •  1#10 

REDSUM  •  REDSUM  ♦  DIST l SEC# 2# AMP ) 

JAKSM  »  JAKSM  ♦  C I  ST ( SEC# 3# AMP ) 

01 S T ( SE C#  3#  AMP )  -  0 

3*0  Continue 
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350 


CONTINUE 

NTOT  •  NTOT  ♦  REOSUM 


CALL  QTSUM2  TO  SEE  IF  ANY  OF  THESE  TARGETS 
ARE  UNIQUE 

CALL  CTSUM2ITIM# ICNT) 

36G  CONTINUE 

CALCULATE  THE  RATE  OF  FIRE  BIN  THAT  THESE  EVENTS 
GO  TO 

ROFBM  WILL  CONTAIN  THE  RATE  OF  MUZZLE  EVENTS 
AVERAGED  OVER  THE  5  MIN  WINOOW 
R0FBN2  WILL  CONTAIN  THE  RATE  OF  MUZZLE  EVENTS 
IN  THE  6  SECOND  WINDOW  EXTRAPOLATED 
TO  1  MIN 


R0FBN1  «  ( CRCM/5) /RGF  }  ♦  1 
MUZSUM  •  0 

DO  370  Ml  -  1*6 

MUZSUM  ■  MUZSUM  ♦  SUMl(Ml) 

370  CONTINUE 

R0FBN2  ■ ( MUZSUM  *  10  /  RCF )  ♦  1 

I F ( SYS  .EO.  1)  ROFBIN  -  R0FBN1 
IF ( SYS  «E0.  2)  ROFBIN  •  RCFBN2 

lFCROFeiN  ,GE»  801  RCFBIN  «  6C 

STORE  IN  0UTSM1  HOW  OFTEN  YOU  WERE  ABLE  TO  DETECT 
THIS  MANY  RED  MUZZLES  AT  THIS  RATE  OF  FIRE 

0UTSM1(R0FBIN,(RE0SUM*1»  )  •  OUTSM1(ROFBIN*REDSUM»1 )  +1 
JACMROFfilN)  ■  JACK  IROFBIN)  ♦  JAKSM 
ROF  3 ( ROF  B IN )  «  ROF 3 ( ROF BIN)  ♦  l 
3*0  CONTINUF 

ICNT  •  I CNT  ♦  1 
CALL  CTSUM2(T1M,ICNT) 

PUNTOT(ICNT)  •  NTOT 
NTOT  •  0 
ITOT  ■  C 
RETURN 

t**************************************************;*  ****************** 

THE  END  OF  THE  INPUT  HAS  BEEN  REACHED 

THIS  IS  THE  BEGINING  OF  ALL  THE  SUMMARY  PRINTOUTS 

*** *************** A********************** ***************************** 

500  CONTINUE 

CALL  0TSUM2(TIM,1CNT) 

WRITE (6#900) 

WR ITE ( 6#  960 ) 

DO  510  I  •  1# ICNT 
WRITE(6#S50  I  1 
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♦  ,  RUNT0TC1) 

510  CONTINUE 

II  »  CT  ♦  2 

FACTOR  •  ( IC ALL  -  6)  *  (6C./1CC.) 


520 

530 


540 


* 

* 

* 

* 


550 


5fc0 

570 


NOW  CALCULATE 

THE 

PERCENT 

CF 

GAME  TIME 

CONDITIONS 

(X 

»  Y ) 

WERE  MET 

IN 

0UTSM1 ( X, Y ) 

DO  530  1  - 

1, 

eo 

DO  520  4 

■ 

i,n 

0UTSM1 ( 

1, 

j»  - 

OUT  SMI ( I 

,J> 

/  FACTOR 

CONTINLE 

CONTINUE 
WR ITE ( 6* 900 ) 

WRITt(6»<540  ) 

IMAX  *  CT 

FMT2I3)  ■  ALPHCCT+l) 

WRITE  <6»FMT2)  AL PHI, < AL PH < JX ) , JX- 1, IMAX) 
00  550  R  ■  1,80 

DC.  540  M  ■  1,11 

LINTOT  ■  LINTOT  ♦  CUTSM1(R,M) 
CONTINUE 

FMTU3I  «  ALPHUI) 

N1  ■  <P  *  RGF )  -  RDF 
N2  ■  CR  *  ROf) 

WRITE(t,FNTl) 

N 1 


,N2 

,(CUTSHHR,I),I-1,II) 
, LINTOT 


LINTOT  »  0. 

CONTINUE 
DO  570  I  ■  1,80 

DO  560  J  ■  1,11 

PRCNT  *  PRC NT  ♦  0UTSN1(I,J) 
CONTINUE 


CONTINUE 

WRITE<fc»<320)  PRCNT 
WRITE (6,900  I 
WP ITE ( 6, 940 ) 


♦ 

* 


580 


wR ITE ( 6, FMT2  ) 

A  L  PH  1 

, t  ALPHt  JX ), JX  >  1,  IN AX  1 

N1  ■  0 
N2  ■  0 

00  620  I  •  1,80 
ROF 1  ■  OUT  SN 1 (1,11 
DO  560  J  ■  2,11 

ROF 1  -  ROF 1  ♦  0UTSN1(I,J) 
CONTINUE 


0UTSM2  WILL  CCNTAIN  THE  NORMALIZED  DISTRIBUTION 
FOR  RCF  ■  I*  50 


DO  6CC  4  -1,11 
0UTSM2CJ)  -C 
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IFIR0F1  .fcQ.  u)  GO  TO  590 

0UTSM2IJ)  ■  (0LTSM1CI#J)  *  100)/  R0F1 
CONTINUE 
CONTINUE 

FMT1(3)  ■  ALPHI II ) 

N1  «  Cl  ♦  ROF )  -  ROF 
N2  ■  (I  *  ROF ) 

DO  610  M  •  1# I I 

LINTOT  •  LINTOT  ♦  CUTSP2UO 
CONTINUE 
W'R  I  T£  ( 6#  F  MT1 ) 

'  N1 

►  # N2 

'  # (0UTSM2( J)#J«1#I1  ) 

'  , LINTOT 

LINTOT  •  0. 

CONTINUE 
WRITE  <6#900) 

ViR  I TE  (  6#  910  ) 

DC  640  I  •  1#  60 

II  *  RCF  ♦  I 

JJ  «  II  -  ROF 

IF  CROF  3(1)  .EQ.G)  GO  TQ  630 

JACK ( I )  •  ( JACK ( 1  )  /  RCF  3(1))  *  3600 
CONTINUE 
WRITE ( 6#  930 ) 

>  JJ 

1  >11 

1  *  JACK  < I ) 

CONTINUE 

CALL  EVENTS{R0F5#MASTIM,ICALL»P0F) 

CALL  AVG( IAMP#PASTIM) 


FORMATS 


9C0  FORMAT ( 1H1 ) 

41v»  F OR  MAT  ( 1H1 

*  #T7#  'CONSTANT 

*  T  7# 'RATE  OF 

*  T7# ‘EVENTS  FOR 

+  T7#  '  1  HOUP 

+  ) 


NO.  CF 1 / 

RED  PUZZLE*/ 
EVENTS'/ 

•// 


920  F0RKATIT2# 'TOT  »  ' 

♦  »  F  9  «  4 

♦  ) 

930  FORMATUX 

*  #16 

A  ,«  -« 

♦  #16 

*  #F9.2 


B 


l1-0' 


*  n 

940  FORMAT  ( T4E 

*  #  *R  E  D  MUZZLE  EVEN 

*  #/> 

950  FORMAT (Til 

*  #13 

*  #  T 17 

*  #14 

*  n 

9fcO  FORMAT (T10 

*  # • MI N  NO.*/ 

*  #  TIC 

*  # • CF  OF*/ 

*  »  T 10 

*  z'GAMfc  */ 

*  ♦  Tlfc 

*  >  *  TGTS • / / 

*  ) 

RETURN 

END 
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SUBROUTINE  CT$UM2(TIM,1CNT> 

INTEGER  TIP 
COMMON  /  RLK9/MASTIM 

*  /  BLK11/IDARAY(240»30C) 

*  /  BIK10/1DTGT  ( 1C9G, 4 ) 

LEVEL  2, ID Afi AY 

DIMENSION  IUNEEM500) 

*  » 1TE  M ( 6,  300  ) 

IF(MA$TIM  .EQ.  999)  GO  TO  50GC 
IFI1CNT  .EC.  0)  ICNT  -  1 

ITIM  .  TIM  -  6 

IF  C  ICNT.NE.  NCNT)  GC  TC  1000 
100  IF  (TIM  .LT.  6)  GO  TC  3000 

CHECK  THE  SIX  SECOND  WINDOW 

DO  5 00  I  ■  1 ,  fa 

CHECK  EACH  UNIQUE  TARGET 

DC  400  J  -  1,3U0 

IF(IDARAY(IT1M+I»J)  .EC.  0)  GC  TO  450 
DO  300  K  *  1,500 

IDTGT  CONTAINS  A  LIST  OF  UNIQUE  TARGETS  AND  WHETHER 
THEY  HAVE  BEEN  LOCATED 

IF(IPARAYCITIM+I»J»  .NE.  IDTGT(K,1))  GO  TO  250 
IF  ( IDTGT (K, 2)  .NE.  0)  GO  TC  350 
ITOT  •  ITOT  ♦  1 
IDTGT  (K,  2 )  «  1 
IDTGT(K,4)  ■  MASTIM 
GC  TO  350 
25 J  CONTINUE 
300  CONTINUE 
350  CONTINUE 
4  OC  CONTINUE 
450  CONTINUE 
5GC  CONTINUE 
RETURN 

1C0C  CONTINUE 

IUNEFK(ICNT)  -  ITOT 
ITOT  ■  0 

STORE  THE  LAST  SIX  SECONDS  OF  THIS  MINUTE  IN  CASE 
TIM  IS  LESS  THAN  SIX  CiN  THE  NEXT  CALL 

DO  1100  I  ■  l,fc 
DC  HOC  J  ■  1,300 
1100  ITEM(  I, J )  •  IDABAY ( 54  +  1, J ) 

NCNT  ■  ICNT 
RETURN 

3000  CONTINUE 

DO  4000  I  «  1,T1M 
DO  4000  J  ■  1, 3CC 
ITEM ( I , J  )  ■  I C  AR  AY ( I , J  ) 

4000  CONTINUE 
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SINCE  TIN  IS  LESS  THAN  SIX  ITEM  WILL  CONTAIN  THE  SIX  SECOND  WIN 

DP  4500  I  ■  1»6 
DC  44C0  J  •  1/ 300 
IF ( ITEM <  I# J  >  .EO.  01  GC  TO  4450 
DP  4300  K  ■  1#  500 

IF(ITEM<I#J)  .NE.  I DT  G1 C  K# 1 )  1  GD  TO  4250 
IM IDTGT  (K*2)  .NE.  Cl  GO  TO  4350 
ITOT  •  ITCT  *1 
IOTGT  <K»  2  1  •  1 
IDTGT(K,41  ■  MASTIM 
GC  TO  4350 
4250  CONTINUE 
43CP  CONTINUE 
4350  CONTINUE 
44CG  CONTINUE 
4450  CONTINUE 
4500  CCNTINUE 
RETURN 

50U 0  CONTINUE 

WRITE (6# 91051 
9105  FORMAT ( 1HI 1 

WRITE (6#  9100  1 
DO  6000  I  ■  1» ICNT 
6030  WRITE  < 6# 90C0 1  It  ILNEEKill 
9000  F0RMAT(10X#I3#3X»I4/) 

9 IOC  FORMAT (9X*  *  MIN  NO.*/ 

19X#  *0F  OF*/  ! 

29X#*GAME  UNIQUE*/ 

315X#«TGTS*//1 

END 
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SUBROUTINE  UMOID 
IMPLICIT  INTEGER  <A-Z> 

COMMON  /  B  LK1 /MISHLN (60 ) 

*  /  BLK10/I0TGT(10G0#4) 

IOTGT (  I#  J  I  WILL  CONTAIN  A  LIST  OF  UNIOUE 
TARGETS  (RED  MUZZ  L f  EVE 

IF  J«1  THEN  THIS  TARGET  HAS  BEEN  LOCATED. 

CALL  TYPE  <  HI  SHUN#  I  TYPE#  IFORCd  IRES) 

1 F ( IF QRC E  .EC.  II  GO  TO  1AC0 

I F ( M IS  HUN ( 3  )  .EC.  01  GO  TO  13C0 

I  UN  I C  ■  IRES  *  lOOOOOOCO  ♦  MISHUN<6)  *  10C00  ♦  MISHUN<7) 
1000  CONTINUE 

I  -  I  ♦  1 

IF ( IDTGT ( I# 1 1  .NE.  01  GO  TO  1200 
IDTGT ( I#  1 1  •  I  UNI Q 
IDTGT ( I#  3  I  ■  MI  SHUN ( 2  I 
1200  CONTINUE 

IF  C IOTGT  C I# 1 1  .NE.  IUNIQ)  GO  TO  1000 
1 3C0  CONTINUE 

1<»00  CONTINUE 
RETURN 
END 
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SUBROUTINE  TGTAPY(FTT) 

COMMON  /  BLKi/M  I  SHUN  <  6  J  ) 

*  /  BLK11/10ARAY(240,300) 

LEVEL  2# IOARAY 
INTEGER  FTT 

IOARAY  CONTAINS  A  LIST  OF  TIMES  SOUND  EVENTS 
REACHED  THE  SOUND  BASE  (1-240) 

AND  THE  UNIQUE  IDENTIFIER  (1-300) 


1000 


1100 

1200 

1300 


CALL  TYPE (MI  SHUN, I  TYPE, I  FORCE, I  RES) 

1*0 

IUNEEK  •  IRES  *  1C0C0C000  ♦  MISHUN(6)  *  10000  ♦  MISHUN(7> 
IF ( ITYPE  .LT.  5)  GO  TO  130C 

IF ( ITYPE  .GT.  12  .AND.  ITYPE  .NE.  15)  GO  TO  1200 
CONTINUE 
I  ■  1  ♦  1 

IF ( IDAR AY (FTT, I)  .NE.  0)  GO  TO  1100 
IOARAY ( F T T, I )  -  IUNEEK 
CONTINUE 

I F ( ICAR AY ( FTT,  I )  .NE.  IUNEEK)  GO  TO  1000 
CONTINUE 
CONTINUE 


■'V  '*• 


SUBROUT INE  TYPE(MISHUN#ITYPE#  1F0RCF»IRES> 
DIMENSION  M I  SHUN ( 60  ) 

DIMENSION  NTYPE(2#40I 

ARRAY  MYPE(I»J>  CONTAINS  ALL  THE  WPN  TYPES 

!■  1*2  FORCE  NO. 

J»  1 #4J  RESOURCE  NG. 


DATA  (NTYPE(1#J>#J*1#4()/ 


* 

0# 

13# 

C# 

0# 

14# 

3# 

0# 

0# 

0# 

0# 

* 

1* 

2# 

lb# 

0# 

0# 

c# 

0# 

0# 

0# 

14# 

* 

14# 

0# 

0* 

0# 

0# 

0# 

C# 

4# 

0# 

0# 

* 

0# 

0# 

G# 

0# 

0# 

c# 

It# 

0# 

0# 

0/ 

DATA 

(NT Y PE ( 2#  J  )  # 

J  *  1#  40 )  / 

* 

0# 

1C# 

11# 

0# 

11# 

5# 

C# 

0# 

11# 

0# 

* 

fc# 

7# 

6# 

0# 

0# 

0# 

0# 

0# 

0# 

11# 

* 

6# 

7# 

0# 

0# 

0# 

c# 

C# 

9# 

0# 

0# 

* 

0# 

C# 

0# 

0, 

0# 

12# 

16# 

0# 

0# 

0/ 

MI  SHUN m 

IS  UNIT 

ID 

*  1000 

♦ 

RESOURCE  * 

10  ♦ 

FORCE 

IFORCE  ■  MI  SHUN ( 8  I  - ( (MI  SHUN ( B J / 10 »  *  101 

IRES  »  (MI$HUN(@)  -  ((MISHUM61/1000)  *  1000H/10 

ic  •  m i shun  <81/ loco 
I  TYPE  *  NTYPE(IFORCE#IR£S> 

RETURN 

END 


DISTRIBUTION  LIST 


No.  of 

Copies  Organization 


Commandant 

US  Arn\y  Field  Artillery 
School 

ATTN:  ATSF-CD-R  (Mr.  Farmer) 
ATSF-CF-R 

Fort  Sill.  OK  73503 


Comma nder/Di rector 
US  Army  Combat  Surveillance  & 
Target  Acquisition  Laboratory 
ATTN:  DELCS-D 
Fort  Monmouth,  NJ  07703 


1  Commander 

Atmospheric  Sciences  Lab 
ATTN:  W.  Miller 
White  Sands  Missile  Range 
NM  88002 

1  Commander 

US  Army  Materiel  Development 
&  Readiness  Command 
ATTN:  DRCPA-P 
5001  Eisenhower  Avenue 
A1 exandri a ,  VA  22333 

1  Commander 

US  Army  Concepts  Analysis 
Agency 

8120  Woodmont  Avenue 
Bethesda,  MD  20014 

2  Director 

US  Army  TRADOC  Systems 
Analysis  Activity 
ATTN:  ATAA-SL 
ATAA-T 

White  Sands  Missile  Range 
NM  88002 


No.  of 

Copies  Organization 

1  Commandant 

Naval  Surface  Weapons 
Center 
Code  G65 

Dahlgren,  VA  22448 

Project  Manager, 
FIREFINDER/REMBASS 
ATTN:  DRCPM-FF-R 
Fort  Monmouth,  NJ  07703 

1  Commander 

US  Army  Intelligence 
Center  &  School 
ATTN:  ATS I-CD-MD 
Fort  Huachuca,  AZ  85613 

Commander 

12  Defense  Technical  Information 

ATTN:  TCA 

Cameron  Station 
Alexandria,  VA  22333 

2  Chief 

Defense  Logistics  Studies 
Information  Exchange 
US  Army  Logistics  Manage¬ 
ment  Center 
ATTN:  DRSMC-D 
Fort  Lee,  VA  23801 

1  Reliability  Analysis  Center 

ATTN:  Mr.  I.  L.  Krulac 
Griff iss  AFB,  NY  13441 
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DISTRIBUTION  LIST  (continued) 
Aberdeen  Provi ng  Ground 


1  Director,  BRL,  Bldg  328 

2  Cdr,  USATECOM 

ATTN:  DRSTE 

DRSTE-CS-A 
Bldg  314 

1  Dir,  BRL 

ATTN:  DRDAR-TSB-S  (STINFO  BRANCH) 
Bldg  305 

1  Dir,  HEL,  Bldg  520 
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